a from scale-rotated-ellipse

Time bar (total: 1.5min)

start0.0ms (0%)

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

analyze1.9s (2.1%)

Memory
9.4MiB live, 1 785.6MiB allocated; 948ms 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
3.5%3.5%96.2%0.2%0%0%0%11
4.1%4.1%95.7%0.2%0%0%0%12
Compiler

Compiled 185 to 54 computations (70.8% saved)

sample4.2s (4.7%)

Memory
144.1MiB live, 4 455.2MiB allocated; 798ms collecting garbage
Samples
3.3s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 2.9s
ival-mult: 793.0ms (27.7% of total)
ival-pow2: 758.0ms (26.5% of total)
ival-div: 411.0ms (14.4% of total)
ival-sinu: 235.0ms (8.2% of total)
ival-cosu: 203.0ms (7.1% of total)
ival-add: 183.0ms (6.4% of total)
ival-sqrt: 124.0ms (4.3% of total)
ival-neg: 71.0ms (2.5% of total)
ival-sub: 67.0ms (2.3% of total)
exact: 10.0ms (0.3% of total)
adjust: 3.0ms (0.1% of total)
ival-assert: 3.0ms (0.1% of total)
Bogosity

explain2.1s (2.4%)

Memory
-46.1MiB live, 2 674.0MiB allocated; 915ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1620-1(-8.915976445621714e+35 -1.5561597355223815e+110 6.553045591259947e-290 1.0941400358626299e+262 -2.9038210845286294e+43)(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
1370-0-(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
1370-0-(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
500-1(-1581608615390.5918 -2.3091510975476547e-172 -4.627103802849678e-190 2.0516468501829277e+117 -3.7540782964139235e-163)(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))
501(1361654882585.939 8.024328656176921e-21 1.5458807374501208e+271 -7.104060500104795e+215 -9.380813674414644e+171)1(9.642403022944068e-284 -5.653729797451912e-223 -1.1410016635367989e+251 -1.8550267090338827e-145 1.5781714944647287e+299)(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))))
500-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))
460-1(-2.8523492818338357e-301 1.292140791858951e+30 7.979262490628419e-47 -1.427880628832831e-141 5.5387449898121297e-73)(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
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)
360-0-(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
310-0-(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
270-1(-4.2283118132212205e-128 4.103926852506611e+89 -4.264616052007675e+96 -1.166323168140882e+126 -2.7633375878313366e-46)(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))
190-0-(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
160-0-(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
150-1(-8.915976445621714e+35 -1.5561597355223815e+110 6.553045591259947e-290 1.0941400358626299e+262 -2.9038210845286294e+43)(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))
140-0-(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
120-0-(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
00-0-x-scale
00-0-(*.f64 b a)
00-0-(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
00-0-(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
00-0-(+.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-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)))))
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-(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))
00-0-(*.f64 x-scale y-scale)
00-0-(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
00-0-(*.f64 b (neg.f64 a))
00-0-(pow.f64 b #s(literal 2 binary64))
00-0-(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
00-0-(neg.f64 a)
00-0-(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
00-0-(+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
00-0-(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 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-a
00-0-(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
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-(neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))))
00-0-(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
00-0-(PI.f64)
00-0-(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
00-0-(/.f64 angle #s(literal 180 binary64))
00-0-(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-#s(literal 4 binary64)
00-0-y-scale
00-0-(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
sin.f64(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))sensitivity1370
cos.f64(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))sensitivity1371
/.f64(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))o/o960
↳(+.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)) (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)))))overflow155
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow92
↳(*.f64 b a)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))))overflow98
↳(-.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))overflow155
↳(*.f64 b (neg.f64 a))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) x-scale)overflow222
↳(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))overflow112
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow188
↳(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))overflow195
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow182
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow129
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow93
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow210
↳(+.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))overflow155
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow129
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow136
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))overflow64
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow150
↳(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))))overflow155
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow103
↳(neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))))overflow123
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow98
↳(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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)))))))overflow123
↳(pow.f64 b #s(literal 2 binary64))overflow75
↳(*.f64 x-scale y-scale)overflow28
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow88
↳(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))overflow133
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow226
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))overflow132
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))overflow67
↳(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))overflow98
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow214
↳(pow.f64 a #s(literal 2 binary64))overflow68
↳(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))overflow98
↳(+.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)))overflow195
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))overflow145
↳(*.f64 b a)overflow28
↳(*.f64 b (neg.f64 a))overflow28
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))overflow64
↳(*.f64 x-scale y-scale)overflow28
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))overflow66
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))overflow67
↳(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))overflow98
-.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-rescue500
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow111
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow75
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow113
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow46
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow107
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow94
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow68
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow44
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow91
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow105
/.f64(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))u/u490
↳(+.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)) (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 b a)underflow54
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
↳(-.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 b (neg.f64 a))underflow54
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)underflow60
↳(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))underflow90
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)underflow62
↳(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))underflow18
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow46
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow17
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow23
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow44
↳(+.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow17
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow126
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))underflow75
↳(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow72
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow132
↳(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)underflow28
↳(neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))))underflow55
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
↳(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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)))))))underflow55
↳(pow.f64 b #s(literal 2 binary64))underflow66
↳(*.f64 x-scale y-scale)underflow40
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow186
↳(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))underflow43
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow44
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))underflow114
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))underflow57
↳(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))underflow75
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow192
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow54
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow42
↳(pow.f64 a #s(literal 2 binary64))underflow63
↳(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))underflow75
↳(+.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)))underflow18
↳(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow5
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))underflow78
↳(*.f64 b a)underflow27
↳(*.f64 b (neg.f64 a))underflow27
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))underflow75
↳(*.f64 x-scale y-scale)underflow40
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))underflow57
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))underflow57
↳(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))underflow75
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-rescue400
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow98
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow94
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow98
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow46
↳(+.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)))overflow195
↳(-.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))overflow155
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow111
↳(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))overflow195
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow91
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow129
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow93
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow105
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow129
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow68
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow75
↳(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))))overflow155
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow103
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow44
↳(pow.f64 b #s(literal 2 binary64))overflow75
↳(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))overflow133
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow113
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow107
↳(pow.f64 a #s(literal 2 binary64))overflow68
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))n*o300
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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/n290
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow105
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow68
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow44
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)o/n280
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow75
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow113
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow46
/.f64(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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/n260
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow98
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow129
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow129
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow98
↳(pow.f64 b #s(literal 2 binary64))overflow75
↳(pow.f64 a #s(literal 2 binary64))overflow68
sqrt.f64(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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-rescue230
↳(+.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)) (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 b a)underflow54
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
↳(-.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 b (neg.f64 a))underflow54
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)underflow60
↳(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))underflow90
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)underflow62
↳(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))underflow18
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow46
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow17
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow23
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow44
↳(+.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow17
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow126
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))underflow75
↳(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow72
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow132
↳(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)underflow28
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
↳(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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)))))))underflow55
↳(pow.f64 b #s(literal 2 binary64))underflow66
↳(*.f64 x-scale y-scale)underflow40
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow186
↳(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))underflow43
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow44
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))underflow114
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))underflow57
↳(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))underflow75
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow192
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow54
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow42
↳(pow.f64 a #s(literal 2 binary64))underflow63
↳(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))underflow75
↳(+.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)))underflow18
↳(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow5
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))underflow78
sqrt.f64(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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-rescue220
↳(+.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)) (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)))))overflow155
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow92
↳(*.f64 b a)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))))overflow98
↳(-.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))overflow155
↳(*.f64 b (neg.f64 a))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) x-scale)overflow222
↳(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))overflow112
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow188
↳(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))overflow195
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow182
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow129
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow93
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow210
↳(+.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))overflow155
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow129
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow136
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))overflow64
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow150
↳(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))))overflow155
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow103
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow98
↳(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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)))))))overflow123
↳(pow.f64 b #s(literal 2 binary64))overflow75
↳(*.f64 x-scale y-scale)overflow28
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow88
↳(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))overflow133
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow226
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))overflow132
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))overflow67
↳(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))overflow98
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow214
↳(pow.f64 a #s(literal 2 binary64))overflow68
↳(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))overflow98
↳(+.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)))overflow195
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))overflow145
/.f64(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))u/u210
↳(*.f64 b a)underflow27
↳(*.f64 b (neg.f64 a))underflow27
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))underflow57
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))underflow57
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))underflow75
↳(*.f64 x-scale y-scale)underflow40
/.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/n170
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow68
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow44
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow91
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow105
/.f64(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))o/o160
↳(*.f64 b a)overflow28
↳(*.f64 b (neg.f64 a))overflow28
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))overflow66
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))overflow67
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))overflow64
↳(*.f64 x-scale y-scale)overflow28
*.f64(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))u*o160
↳(*.f64 b a)underflow54
↳(*.f64 b (neg.f64 a))underflow54
↳(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))underflow90
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))underflow75
↳(*.f64 x-scale y-scale)underflow40
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))underflow114
↳(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))underflow75
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))underflow57
↳(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))underflow75
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow98
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow188
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow98
↳(+.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)) (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)))))overflow155
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow92
↳(+.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)))overflow195
↳(-.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))overflow155
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow222
↳(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))overflow195
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow182
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow129
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow93
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow210
↳(+.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))overflow155
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow129
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow136
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow150
↳(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))))overflow155
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow103
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow88
↳(pow.f64 b #s(literal 2 binary64))overflow75
↳(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))overflow133
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow226
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow214
↳(pow.f64 a #s(literal 2 binary64))overflow68
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)o/n140
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow75
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow113
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow46
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow107
-.f64(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))nan-rescue140
↳(pow.f64 b #s(literal 2 binary64))overflow75
↳(pow.f64 a #s(literal 2 binary64))overflow68
/.f64(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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))))overflow98
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow129
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow98
↳(pow.f64 b #s(literal 2 binary64))overflow75
↳(pow.f64 a #s(literal 2 binary64))overflow68
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow129
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow93
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-rescue100
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)underflow31
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
↳(-.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)underflow30
↳(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))underflow18
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow23
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow17
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow23
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow22
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow17
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow63
↳(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow36
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow66
↳(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)underflow28
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow93
↳(pow.f64 b #s(literal 2 binary64))underflow66
↳(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))underflow43
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow22
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow96
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow21
↳(pow.f64 a #s(literal 2 binary64))underflow63
↳(+.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)))underflow18
↳(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow3
/.f64(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))n/o60
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))overflow64
↳(*.f64 x-scale y-scale)overflow28
/.f64(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))n/u60
↳(*.f64 b a)underflow27
↳(*.f64 b (neg.f64 a))underflow27
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))underflow75
↳(*.f64 x-scale y-scale)underflow40
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))underflow57
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))underflow57
↳(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))underflow75
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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/n60
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow22
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow63
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow93
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
↳(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow1
/.f64(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))u/n50
↳(+.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)) (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 b a)underflow54
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
↳(-.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 b (neg.f64 a))underflow54
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)underflow60
↳(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))underflow90
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)underflow62
↳(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))underflow18
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow46
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow17
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow23
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow44
↳(+.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow17
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow126
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))underflow75
↳(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow72
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow132
↳(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)underflow28
↳(neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))))underflow55
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
↳(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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)))))))underflow55
↳(pow.f64 b #s(literal 2 binary64))underflow66
↳(*.f64 x-scale y-scale)underflow40
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow186
↳(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))underflow43
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow44
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))underflow114
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))underflow57
↳(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))underflow75
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow192
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow54
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow42
↳(pow.f64 a #s(literal 2 binary64))underflow63
↳(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))underflow75
↳(+.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)))underflow18
↳(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow5
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))underflow78
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)u/n50
↳(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow36
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow66
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow22
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow96
↳(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow1
*.f64(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))n*o50
*.f64(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))n*u50
/.f64(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))o/n40
↳(*.f64 b a)overflow28
↳(*.f64 b (neg.f64 a))overflow28
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))overflow66
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))overflow67
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))o*u40
↳(*.f64 b a)overflow28
↳(*.f64 b (neg.f64 a))overflow28
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))overflow64
↳(*.f64 x-scale y-scale)overflow28
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))overflow66
↳(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))overflow98
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))overflow67
↳(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))overflow98
↳(*.f64 b a)underflow27
↳(*.f64 b (neg.f64 a))underflow27
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))underflow57
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))n*u40
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))n*o40
/.f64(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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/n30
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow17
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow17
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
↳(pow.f64 b #s(literal 2 binary64))underflow66
↳(pow.f64 a #s(literal 2 binary64))underflow63
↳(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow1
/.f64(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))o/n30
↳(+.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)) (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)))))overflow155
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow92
↳(*.f64 b a)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))))overflow98
↳(-.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))overflow155
↳(*.f64 b (neg.f64 a))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) x-scale)overflow222
↳(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))overflow112
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow188
↳(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))overflow195
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow182
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow129
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow93
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow210
↳(+.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))overflow155
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow129
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow136
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))overflow64
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow150
↳(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))))overflow155
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow103
↳(neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))))overflow123
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow98
↳(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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)))))))overflow123
↳(pow.f64 b #s(literal 2 binary64))overflow75
↳(*.f64 x-scale y-scale)overflow28
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow88
↳(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))overflow133
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow226
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))overflow132
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))overflow67
↳(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))overflow98
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow214
↳(pow.f64 a #s(literal 2 binary64))overflow68
↳(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))overflow98
↳(+.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)))overflow195
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))overflow145
/.f64(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))n/o20
↳(*.f64 b a)overflow28
↳(*.f64 b (neg.f64 a))overflow28
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))overflow64
↳(*.f64 x-scale y-scale)overflow28
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))overflow66
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))overflow67
↳(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))overflow98
/.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))underflow63
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow93
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow27
↳(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow1
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow23
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow22
/.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))))underflow36
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow66
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow22
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow96
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow21
↳(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow1
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))u*o20
↳(*.f64 b a)underflow27
↳(*.f64 b (neg.f64 a))underflow27
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))underflow75
↳(*.f64 x-scale y-scale)underflow40
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))underflow57
↳(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))underflow75
↳(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))underflow57
↳(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))underflow75
↳(*.f64 b a)overflow28
↳(*.f64 b (neg.f64 a))overflow28
↳(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))overflow66
/.f64(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))n/u20
↳(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))underflow75
↳(*.f64 x-scale y-scale)underflow40
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))o*u10
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow129
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow129
↳(pow.f64 b #s(literal 2 binary64))overflow75
↳(pow.f64 a #s(literal 2 binary64))overflow68
↳(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow1
Confusion
Predicted +Predicted -
+2510
-32
Precision
0.9881889763779528
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+25100
-302
Precision?
0.9881889763779528
Recall?
1.0
Freqs
test
numberfreq
02
134
242
359
469
530
69
77
83
91
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
256.0ms512×0valid
Compiler

Compiled 3 413 to 172 computations (95% saved)

Precisions
Click to see histograms. Total time spent on operations: 203.0ms
ival-mult: 59.0ms (29.1% of total)
ival-pow2: 43.0ms (21.2% of total)
ival-div: 30.0ms (14.8% of total)
ival-cosu: 22.0ms (10.9% of total)
ival-sinu: 19.0ms (9.4% of total)
ival-add: 10.0ms (4.9% of total)
ival-sqrt: 6.0ms (3% of total)
ival-sub: 4.0ms (2% of total)
ival-neg: 4.0ms (2% of total)
ival-pi: 2.0ms (1% of total)
ival-true: 1.0ms (0.5% of total)
exact: 1.0ms (0.5% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

preprocess226.0ms (0.3%)

Memory
1.6MiB live, 270.9MiB allocated; 32ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05563888
116543764
056183
0104183
1191181
2720180
37199178
08672173
Stop Event
1×iter limit
1×node limit
1×iter limit
1×node limit
Calls
Call 1
Inputs
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
Outputs
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(/.f64 (sqrt.f64 (*.f64 (fma.f64 (+.f64 (hypot.f64 (neg.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64))) (*.f64 (*.f64 (fma.f64 (neg.f64 a) a (*.f64 b b)) (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) (/.f64 #s(literal 2 binary64) (*.f64 y-scale x-scale))))) (fma.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 b) (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (neg.f64 x-scale))) (neg.f64 (/.f64 (*.f64 (neg.f64 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 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (neg.f64 a)) (neg.f64 x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (neg.f64 a)) (neg.f64 x-scale))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (fabs.f64 b)) (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (fabs.f64 b)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fabs.f64 a)) (*.f64 (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fabs.f64 a)))) (*.f64 y-scale y-scale))))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (fabs.f64 a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (fabs.f64 a)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fabs.f64 b)) (*.f64 (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fabs.f64 b)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (neg.f64 a) b) b) y-scale) (/.f64 a (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (*.f64 a b) #s(literal 4 binary64))) (neg.f64 b)) a) (*.f64 (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (fabs.f64 b)) (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (fabs.f64 b)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fabs.f64 a)) (*.f64 (sin.f64 (fma.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fabs.f64 a)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (neg.f64 a) b) b) y-scale) (/.f64 a (*.f64 (*.f64 x-scale x-scale) y-scale))) (*.f64 (*.f64 a b) #s(literal 4 binary64))) (neg.f64 b)) a))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (/.f64 b (*.f64 y-scale x-scale))))) (/.f64 (/.f64 (neg.f64 a) x-scale) y-scale)))
Symmetry

(abs a)

(abs b)

(abs x-scale)

(abs y-scale)

Compiler

Compiled 183 to 56 computations (69.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
4.0MiB live, 4.0MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶2.3%
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
Compiler

Compiled 183 to 56 computations (69.4% saved)

series892.0ms (1%)

Memory
73.4MiB live, 1 245.8MiB allocated; 263ms collecting garbage
Counts
56 → 560
Calls
Call 1
Inputs
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))))
(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
#s(literal 2 binary64)
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))
#s(literal 4 binary64)
(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))
(*.f64 b a)
b
a
(*.f64 b (neg.f64 a))
(neg.f64 a)
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(*.f64 x-scale y-scale)
x-scale
y-scale
(+.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)) (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 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
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))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (* (pow b 2) (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* (pow a 2) (- (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (* (pow b 2) (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* (pow b 4) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 4) (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (* (/ (* (pow a 2) (* (pow b 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 x-scale 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)))))) (* 8 (/ (* (pow b 4) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 4) (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 8 (/ (* (pow b 4) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -2 (* (/ (* (pow a 2) (* (pow b 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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 x-scale 2) (pow y-scale 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))))) (* 4 (* (/ (* (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 (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 x-scale 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 (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -8 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 4 (* (* b a) (* b (neg a)))) #s(hole binary64 (* -4 (* (pow a 2) (pow b 2)))))
#s(approx (* (* b a) (* b (neg a))) #s(hole binary64 (* -1 (* (pow a 2) (pow b 2)))))
#s(approx (* b a) #s(hole binary64 (* a b)))
#s(approx a #s(hole binary64 a))
#s(approx (* b (neg a)) #s(hole binary64 (* -1 (* a b))))
#s(approx (neg a) #s(hole binary64 (* -1 a)))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (pow (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (/ (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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))))))))) (+ (/ (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 (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 b 2) (pow (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 (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 (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) #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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 3) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (- (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (- (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (- (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 6) (* (pow b 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 6) (+ (* 8 (/ (* (pow b 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 6) (+ (* 4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (pow x-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 6) (+ (* -2 (* (/ (* (pow b 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) (* (pow x-scale 2) (pow y-scale 2)))) (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))))) (+ (* 4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (pow x-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (* (pow x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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))) (+ (/ (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 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)) (/ (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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 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)) (/ (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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 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)) (/ (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) (/ (/ (+ (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 (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) (/ (/ (+ (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 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 (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 (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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow a 3) (- (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow a 3) (- (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow a 3) (- (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 3) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* (pow b 2) (- (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 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) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 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) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 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) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 4) (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (* (/ (* (pow a 4) (* (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))))))) (* (pow x-scale 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)))))) (* 8 (/ (* (pow a 4) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 8 (/ (* (pow a 4) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -2 (* (/ (* (pow a 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)))))))) (* (pow x-scale 2) (pow y-scale 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))))) (* 4 (* (/ (* (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 (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 x-scale 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 b #s(hole binary64 b))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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 (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (/ (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 (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))))))))) (+ (/ (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 (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (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 (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 (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 3) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (- (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (- (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (- (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 6) (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 6) (+ (* 8 (/ (* (pow a 4) (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* 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 (cos (* 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 x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 6) (+ (* 4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (pow x-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* 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 (cos (* 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 x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 6) (+ (* -2 (* (/ (* (pow a 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) (* (pow x-scale 2) (pow y-scale 2)))) (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))))) (+ (* 4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (pow x-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* 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 (cos (* 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 x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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))) (+ (/ (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 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)) (/ (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 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)) (/ (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 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)) (/ (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 (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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 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)) (/ (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) #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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow b 3) (- (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow b 3) (- (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow b 3) (- (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 3) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (* (pow a 2) (* (pow b 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale)))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 angle 2) (* b (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))))))) (* y-scale (sqrt 2)))) (/ (* (pow a 2) (* (pow b 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale)))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* (pow angle 2) (* b (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* y-scale (sqrt 2)))) (* 1/2 (/ (* (pow a 2) (* b (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* y-scale (sqrt 2)))))) (/ (* (pow a 2) (* (pow b 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale)))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* (pow angle 2) (- (* -1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (sqrt 8) (- (+ (* 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* y-scale (sqrt 2)))) (* 1/2 (/ (* (pow a 2) (* b (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* y-scale (sqrt 2)))))) (* 1/2 (/ (* (pow a 2) (* b (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* y-scale (sqrt 2)))))) (/ (* (pow a 2) (* (pow b 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale)))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 angle 2) (* b (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))))))) (* y-scale (sqrt 2)))) (/ (* (pow a 2) (* (pow b 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale)))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* b (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* y-scale (sqrt 2)))) (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* y-scale (sqrt 2)))))) (/ (* (pow a 2) (* (pow b 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale)))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* b (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* y-scale (sqrt 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* b (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* y-scale (sqrt 2)))) (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (sqrt 8) (- (+ (* 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* y-scale (sqrt 2)))))))) (/ (* (pow a 2) (* (pow b 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale)))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))) #s(hole binary64 (* 16 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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 x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))) #s(hole binary64 (+ (* 16 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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 x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))) #s(hole binary64 (+ (* 16 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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 x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (* (pow x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (pow x-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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (pow x-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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 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 angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (pow x-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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 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 angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 angle 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 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 b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (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 (+ (/ (pow a 2) (pow y-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) (/ (/ (+ (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) (+ (/ (pow a 2) (pow y-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) (/ (/ (+ (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))))))) (+ (/ (pow a 2) (pow y-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) (/ (/ (+ (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 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 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/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 b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))))))) (+ (/ (pow a 2) (pow y-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 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 (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 angle #s(hole binary64 angle))
#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 (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) #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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (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 (cos (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (+ (/ (* (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)) (+ (/ (* (pow b 2) (pow (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 (cos (* 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)) (/ (* (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) #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 (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) #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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -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 (cos (* 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 (/ (* (+ (* 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 a 2) (pow (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 (cos (* 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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* (pow x-scale 2) y-scale)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (pow x-scale 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (cos (* 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 (/ (* (+ (* 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 a 2) (pow (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 (cos (* 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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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))))))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* (pow x-scale 2) y-scale)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (pow x-scale 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) y-scale) (sqrt (+ (* 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) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) y-scale) (sqrt (/ 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) y-scale) (sqrt (+ (* 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) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) y-scale) (sqrt (/ 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) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (cos (* 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 (/ (* (+ (* 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 a 2) (pow (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 (cos (* 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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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))))))))))) y-scale) (sqrt (/ 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 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 4) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (* (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 a 2) (pow (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 y-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (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 y-scale 2) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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 a 2) (pow (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 y-scale 2)))))) (pow x-scale 4))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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 a 2) (pow (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 y-scale 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow b 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 y-scale 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 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) (* 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 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 4))))
#s(approx (pow (* x-scale y-scale) 2) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (* x-scale y-scale) #s(hole binary64 (* x-scale y-scale)))
#s(approx x-scale #s(hole binary64 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (* 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (+ (* 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 a 2) (pow (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))))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (+ (* 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 a 2) (pow (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))))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (+ (* 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 a 2) (pow (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))))
#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 (/ (+ (* (pow 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)))))) (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) x-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 6) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 6) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) x-scale)))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 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) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 4) (- (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 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))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 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 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))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (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 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))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow y-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 y-scale 2))) (* 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) x-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 6) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 6) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) x-scale))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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)))) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale (pow y-scale 2))) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow y-scale 2))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow y-scale 2))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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)))) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow y-scale 2))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale (pow y-scale 2))) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow y-scale 2))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) x-scale) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) x-scale) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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)))) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (pow y-scale 2))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (* (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 a 2) (pow (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 x-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (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 x-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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)))))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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)))))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow b 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 x-scale 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 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) (* 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 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 4))))
#s(approx y-scale #s(hole binary64 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (* 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (+ (* 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 a 2) (pow (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))))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (+ (* 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 a 2) (pow (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))))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (+ (* 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 a 2) (pow (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))))
#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 (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 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)))))) (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))) y-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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)))))))) y-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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)))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))))) y-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))) y-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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)))))))) y-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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)))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))))) y-scale)))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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)))))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 4) (- (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 x-scale 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))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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)))))) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 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 x-scale 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))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (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 x-scale 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))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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)))))) (pow x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 x-scale 2))) (* 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (* 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))) (+ (/ (* (pow a 2) (pow (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (* 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))) (+ (/ (* (pow a 2) (pow (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (* 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))) (+ (/ (* (pow a 2) (pow (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))) y-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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)))))))) y-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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)))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))))) y-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))) y-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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)))))))) y-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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)))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))))) y-scale))))
Calls

15 calls:

TimeVariablePointExpression
88.0ms
x-scale
@0
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))))) (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))) (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)) (* 4 (* (* b a) (* b (neg a)))) 4 (* (* b a) (* b (neg a))) (* b a) b a (* b (neg a)) (neg a) (pow (* x-scale y-scale) 2) (* x-scale y-scale) x-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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (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 (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)))) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI))) (/ (/ (+ (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)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))
78.0ms
a
@0
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))))) (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))) (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)) (* 4 (* (* b a) (* b (neg a)))) 4 (* (* b a) (* b (neg a))) (* b a) b a (* b (neg a)) (neg a) (pow (* x-scale y-scale) 2) (* x-scale y-scale) x-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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (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 (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)))) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI))) (/ (/ (+ (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)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))
77.0ms
angle
@0
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))))) (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))) (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)) (* 4 (* (* b a) (* b (neg a)))) 4 (* (* b a) (* b (neg a))) (* b a) b a (* b (neg a)) (neg a) (pow (* x-scale y-scale) 2) (* x-scale y-scale) x-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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (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 (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)))) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI))) (/ (/ (+ (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)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))
55.0ms
y-scale
@0
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))))) (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))) (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)) (* 4 (* (* b a) (* b (neg a)))) 4 (* (* b a) (* b (neg a))) (* b a) b a (* b (neg a)) (neg a) (pow (* x-scale y-scale) 2) (* x-scale y-scale) x-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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (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 (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)))) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI))) (/ (/ (+ (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)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))
53.0ms
b
@0
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))))) (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))) (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)) (* 4 (* (* b a) (* b (neg a)))) 4 (* (* b a) (* b (neg a))) (* b a) b a (* b (neg a)) (neg a) (pow (* x-scale y-scale) 2) (* x-scale y-scale) x-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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (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 (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)))) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle 180 (PI) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI))) (/ (/ (+ (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)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))

rewrite1.5s (1.7%)

Memory
37.6MiB live, 1 978.8MiB allocated; 934ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03431246968
03535226848
010474222021
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
616 → 668
Calls
Call 1
Inputs
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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))))))))
(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
#s(literal 2 binary64)
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))
#s(literal 4 binary64)
(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))
(*.f64 b a)
b
a
(*.f64 b (neg.f64 a))
(neg.f64 a)
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(*.f64 x-scale y-scale)
x-scale
y-scale
(+.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)) (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 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
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))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (* (pow b 2) (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* (pow a 2) (- (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (* (pow b 2) (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* (pow b 4) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 4) (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (* (/ (* (pow a 2) (* (pow b 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 x-scale 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)))))) (* 8 (/ (* (pow b 4) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 4) (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 8 (/ (* (pow b 4) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -2 (* (/ (* (pow a 2) (* (pow b 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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 x-scale 2) (pow y-scale 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))))) (* 4 (* (/ (* (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 (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 x-scale 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 (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) #s(hole binary64 (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -8 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 4 (* (* b a) (* b (neg a)))) #s(hole binary64 (* -4 (* (pow a 2) (pow b 2)))))
#s(approx (* (* b a) (* b (neg a))) #s(hole binary64 (* -1 (* (pow a 2) (pow b 2)))))
#s(approx (* b a) #s(hole binary64 (* a b)))
#s(approx a #s(hole binary64 a))
#s(approx (* b (neg a)) #s(hole binary64 (* -1 (* a b))))
#s(approx (neg a) #s(hole binary64 (* -1 a)))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (pow (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (/ (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 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))))))))) (+ (/ (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 (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 b 2) (pow (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 (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 (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) #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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 3) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (- (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (- (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (- (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 6) (* (pow b 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 6) (+ (* 8 (/ (* (pow b 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 6) (+ (* 4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (pow x-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 6) (+ (* -2 (* (/ (* (pow b 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) (* (pow x-scale 2) (pow y-scale 2)))) (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))))) (+ (* 4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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) (* (pow x-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (* (pow x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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))) (+ (/ (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 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)) (/ (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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 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)) (/ (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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 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)) (/ (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) (/ (/ (+ (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 (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) (/ (/ (+ (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 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 (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 (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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow a 3) (- (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow a 3) (- (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow a 3) (- (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 3) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* (pow b 2) (- (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 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) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 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) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 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) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (+ (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 (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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 4) (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (* (/ (* (pow a 4) (* (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))))))) (* (pow x-scale 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)))))) (* 8 (/ (* (pow a 4) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 4) (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 8 (/ (* (pow a 4) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -2 (* (/ (* (pow a 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)))))))) (* (pow x-scale 2) (pow y-scale 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))))) (* 4 (* (/ (* (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 (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 x-scale 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 b #s(hole binary64 b))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (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 (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (/ (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 (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))))))))) (+ (/ (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 (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (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 (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 (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 3) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (- (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (- (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (- (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 6) (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 6) (+ (* 8 (/ (* (pow a 4) (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* 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 (cos (* 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 x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 6) (+ (* 4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (pow x-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* 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 (cos (* 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 x-scale 2) (pow y-scale 2))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 6) (+ (* -2 (* (/ (* (pow a 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) (* (pow x-scale 2) (pow y-scale 2)))) (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))))) (+ (* 4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* (pow x-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (+ (* 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 (cos (* 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 x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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))) (+ (/ (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 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)) (/ (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 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)) (/ (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 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)) (/ (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 (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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 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)) (/ (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) #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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow b 3) (- (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow b 3) (- (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow b 3) (- (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 3) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 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 (cos (* 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) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (* (pow a 2) (* (pow b 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale)))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 angle 2) (* b (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))))))) (* y-scale (sqrt 2)))) (/ (* (pow a 2) (* (pow b 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale)))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* (pow angle 2) (* b (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* y-scale (sqrt 2)))) (* 1/2 (/ (* (pow a 2) (* b (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* y-scale (sqrt 2)))))) (/ (* (pow a 2) (* (pow b 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale)))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (- (* (pow angle 2) (- (* -1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (sqrt 8) (- (+ (* 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* y-scale (sqrt 2)))) (* 1/2 (/ (* (pow a 2) (* b (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* y-scale (sqrt 2)))))) (* 1/2 (/ (* (pow a 2) (* b (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* y-scale (sqrt 2)))))) (/ (* (pow a 2) (* (pow b 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale)))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 angle 2) (* b (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))))))) (* y-scale (sqrt 2)))) (/ (* (pow a 2) (* (pow b 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale)))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* b (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* y-scale (sqrt 2)))) (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* y-scale (sqrt 2)))))) (/ (* (pow a 2) (* (pow b 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale)))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* b (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* y-scale (sqrt 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow a 2) (* b (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* y-scale (sqrt 2)))) (* 1/2 (/ (* (pow a 2) (* (pow angle 2) (* b (* (sqrt 8) (- (+ (* 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* y-scale (sqrt 2)))))))) (/ (* (pow a 2) (* (pow b 3) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) y-scale)))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))) #s(hole binary64 (* 16 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow angle 2) (* (pow b 4) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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 x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))) #s(hole binary64 (+ (* 16 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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 x-scale 2) (pow y-scale 2)))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))) #s(hole binary64 (+ (* 16 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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 x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (+ (* 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (* (pow x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (pow x-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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (pow x-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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 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 angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (pow x-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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 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 angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 angle 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 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 b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (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 (+ (/ (pow a 2) (pow y-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) (/ (/ (+ (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))))) (+ (/ (pow a 2) (pow y-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) (/ (/ (+ (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))))))) (+ (/ (pow a 2) (pow y-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) (/ (/ (+ (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 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 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/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 b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))))))) (+ (/ (pow a 2) (pow y-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 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 (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 angle #s(hole binary64 angle))
#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 (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) #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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (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 (cos (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (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 (cos (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (+ (/ (* (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)) (+ (/ (* (pow b 2) (pow (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 (cos (* 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)) (/ (* (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) #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 (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) #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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -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 (cos (* 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 (/ (* (+ (* 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 a 2) (pow (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 (cos (* 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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* (pow x-scale 2) y-scale)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (pow x-scale 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (cos (* 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 (/ (* (+ (* 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 a 2) (pow (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 (cos (* 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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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))))))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* (pow x-scale 2) y-scale)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (pow x-scale 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) y-scale) (sqrt (+ (* 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) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) y-scale) (sqrt (/ 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) y-scale) (sqrt (+ (* 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) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) y-scale) (sqrt (/ 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) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) y-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (cos (* 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 (/ (* (+ (* 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 a 2) (pow (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 (cos (* 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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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))))))))))) y-scale) (sqrt (/ 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 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 4) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (* (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 a 2) (pow (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 y-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)))) (pow x-scale 4))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (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 y-scale 2) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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 a 2) (pow (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 y-scale 2)))))) (pow x-scale 4))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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 a 2) (pow (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 y-scale 2))) (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow b 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 y-scale 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 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) (* 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 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 4))))
#s(approx (pow (* x-scale y-scale) 2) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (* x-scale y-scale) #s(hole binary64 (* x-scale y-scale)))
#s(approx x-scale #s(hole binary64 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (* 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (+ (* 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 a 2) (pow (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))))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (+ (* 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 a 2) (pow (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))))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (+ (* 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 a 2) (pow (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))))
#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 (/ (+ (* (pow 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)))))) (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) x-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 6) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 6) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) x-scale)))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 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) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow y-scale 2)))) (pow x-scale 2))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 4) (- (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 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))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 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 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))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (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 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))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow y-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 y-scale 2))) (* 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) x-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 6) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) x-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) x-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 6) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) x-scale))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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)))) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale (pow y-scale 2))) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow y-scale 2))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow y-scale 2))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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)))) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow y-scale 2))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale (pow y-scale 2))) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow y-scale 2))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) x-scale) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) x-scale) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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)))) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) x-scale) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (pow y-scale 2))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-scale 4))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (* (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 a 2) (pow (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 x-scale 2))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)))) (pow y-scale 4))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (* (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 x-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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)))))) (pow x-scale 2)))))) (pow y-scale 4))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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)))))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow b 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 x-scale 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 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) (* 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 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 4))))
#s(approx y-scale #s(hole binary64 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (* 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (+ (* 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 a 2) (pow (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))))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (+ (* 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 a 2) (pow (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))))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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))) (+ (* 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 a 2) (pow (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))))
#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 (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 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)))))) (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))) y-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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)))))))) y-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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)))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))))) y-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))) y-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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)))))))) y-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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)))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))))) y-scale)))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 4) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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)))))) (pow x-scale 2)))) (pow y-scale 2))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 b 4) (- (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 x-scale 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))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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)))))) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 4) (* (pow b 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 x-scale 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))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (- (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 x-scale 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))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* 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)))))) (pow x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 x-scale 2))) (* 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (* 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))) (+ (/ (* (pow a 2) (pow (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (* 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))) (+ (/ (* (pow a 2) (pow (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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)))))) (+ (* 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))) (+ (/ (* (pow a 2) (pow (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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 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) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))) y-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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)))))))) y-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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)))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))))) y-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (+ (* 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 (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))) y-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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)))))))) y-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* x-scale (pow y-scale 2))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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)))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 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)))))))) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 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)))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (+ (* 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))))))))) y-scale))))
Outputs
(/.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (/.f64 (fma.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)) (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 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (/.f64 (fma.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)) (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 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (/.f64 (fma.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)) (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 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (/.f64 (fma.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)) (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)))))
(pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (/.f64 (fma.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)) (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)))) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (/.f64 (fma.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)) (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 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.f64 (/.f64 (fma.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)) (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 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
#s(literal 2 binary64)
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))
#s(literal 4 binary64)
(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))
(*.f64 b a)
b
a
(*.f64 b (neg.f64 a))
(neg.f64 a)
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 x-scale y-scale)
x-scale
y-scale
(/.f64 (+.f64 (pow.f64 (/.f64 (fma.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)) #s(literal 3 binary64)) (pow.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)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (fma.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 (fma.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 (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)) (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 (fma.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)) (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 (fma.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)) (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 (pow.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) #s(literal 3 binary64)) (pow.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) #s(literal 3 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) 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 (*.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 (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 (fma.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 (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))))
(sin.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
#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)))))
(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 (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)))))
(*.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))))
(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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))))))) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))))))) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))))) (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))))))) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 a a) (-.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))))) (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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) (fma.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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) (fma.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))))) (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 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 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 8 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (+.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 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)))))) (-.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 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 4 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (-.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 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 (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))
#s(approx (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))
#s(approx (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))
#s(approx (* 4 (* (* b a) (* b (neg a)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))))
#s(approx (* (* b a) (* b (neg a))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 b b))))
#s(approx (* b a) (*.f64 a b))
#s(approx a a)
#s(approx (* b (neg a)) (*.f64 #s(literal -1 binary64) (*.f64 a b)))
#s(approx (neg a) (*.f64 #s(literal -1 binary64) a))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)) (fma.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)) (fma.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))) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)) (fma.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))) (fma.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))))))))))) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale 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 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale 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)) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale 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) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (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/2 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 6 binary64))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 a a) a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 a a) a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 a a) a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (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/2 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 a a) a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 a a) a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 a a) a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (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/2 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 6 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 a a)) (/.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 6 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) (/.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 (*.f64 x-scale y-scale) #s(literal 2 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 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 a a)) (/.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 6 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 (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 (*.f64 x-scale y-scale) #s(literal 2 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 4 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) (/.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 (*.f64 x-scale y-scale) #s(literal 2 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 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 a a)) (/.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (pow.f64 (*.f64 x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))) (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))))) (*.f64 x-scale x-scale)) (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))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))) (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))) (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))))) (*.f64 x-scale x-scale)) (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))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))) (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))) (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))))) (*.f64 x-scale x-scale)) (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))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.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 (*.f64 a a) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.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 (*.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))))) (*.f64 x-scale x-scale)) (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))))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (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/2 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 6 binary64))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))))) (pow.f64 a #s(literal 4 binary64))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 a a) a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 a a) a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 a a) a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (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/2 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/.f64 (*.f64 (*.f64 (*.f64 a a) a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 a a) a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 a a) a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 a a) a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (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/2 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 b b) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))))))) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))))) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))))))) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 b b) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 b b) (-.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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) (fma.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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) (fma.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))))) y-scale)) (pow.f64 (pow.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.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))))))))) (*.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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (+.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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.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)))))))))) (*.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 4 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (-.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 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 b b)
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)) (fma.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)) (fma.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))) (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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)) (fma.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))) (fma.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))))))))))) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 a a) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 b b) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))
#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 (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (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/2 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))))) (pow.f64 b #s(literal 6 binary64))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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) b) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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) b) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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) b) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (pow.f64 b #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (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/2 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 b b) b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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) b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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) b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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) b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (pow.f64 b #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (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/2 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 6 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 6 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (/.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 (*.f64 x-scale y-scale) #s(literal 2 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 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 6 binary64)) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 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 (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 (*.f64 x-scale y-scale) #s(literal 2 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 4 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (/.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 (*.f64 x-scale y-scale) #s(literal 2 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 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 b b)) (/.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))) (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))))) (*.f64 y-scale y-scale)) (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))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))) (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))) (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))))) (*.f64 y-scale y-scale)) (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))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))) (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))) (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))))) (*.f64 y-scale y-scale)) (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))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale 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 b b) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale 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 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))))) (*.f64 y-scale y-scale)) (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))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale 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) (*.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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (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/2 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))))) (pow.f64 b #s(literal 6 binary64))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 b b) b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 b b) b) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 b b) b) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 b b) b) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (pow.f64 b #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (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/2 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 b b) b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 b b) b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 b b) b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (pow.f64 b #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))))) (-.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 (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/2 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (pow.f64 b #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (*.f64 x-scale y-scale))) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) y-scale)) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 angle angle) b) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 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)) (fma.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/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)))))))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 angle angle) b) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 #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 #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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)) (/.f64 (*.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 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)) (fma.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/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))))))))) (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 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)) (fma.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/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)))))))))) #s(literal 2 binary64)))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) b) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 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)) (fma.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/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))))))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) b) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 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)) (fma.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/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))))))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 angle angle) b) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (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 (/.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 (*.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 (fma.f64 (*.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 y-scale y-scale) (*.f64 (*.f64 x-scale x-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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)) (/.f64 (*.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 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)) (fma.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/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 (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/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)) (/.f64 (*.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 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)) (fma.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/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))))))))) (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 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)) (fma.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/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)))))))))) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) b) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 #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 #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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)) (/.f64 (*.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 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)) (fma.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/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))))))))) (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 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)) (fma.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/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)))))))))) #s(literal 2 binary64))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 a a) y-scale) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 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)) (fma.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/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)))))))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 angle angle) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 #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 #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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)) (/.f64 (*.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 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)) (fma.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/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))))))))) (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 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)) (fma.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/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)))))))))) #s(literal 2 binary64)))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 b (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 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)) (fma.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/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))))))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 angle angle) (-.f64 (*.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (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 (/.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 (*.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 (fma.f64 (*.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 y-scale y-scale) (*.f64 (*.f64 x-scale x-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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)) (/.f64 (*.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 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)) (fma.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/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 (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/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)) (/.f64 (*.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 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)) (fma.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/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))))))))) (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 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)) (fma.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/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)))))))))) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 b (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 #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 #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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)) (/.f64 (*.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 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)) (fma.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/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))))))))) (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 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)) (fma.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/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)))))))))) #s(literal 2 binary64))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 b (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 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)) (fma.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/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))))))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 a a) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 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)) (fma.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/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)))))))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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/2 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 b (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 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)) (fma.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/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))))))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 #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 #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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)) (/.f64 (*.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 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)) (fma.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/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))))))))) (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 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)) (fma.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/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)))))))))) #s(literal 2 binary64)))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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/2 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 b (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 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)) (fma.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/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))))))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 b (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 #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 #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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)) (/.f64 (*.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 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)) (fma.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/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))))))))) (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 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)) (fma.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/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)))))))))) #s(literal 2 binary64))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (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 (/.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 (*.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 (fma.f64 (*.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 y-scale y-scale) (*.f64 (*.f64 x-scale x-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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)) (/.f64 (*.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 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)) (fma.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/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 (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/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)) (/.f64 (*.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 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)) (fma.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/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))))))))) (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 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)) (fma.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/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)))))))))) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) y-scale))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 16 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 y-scale y-scale)))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 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)) (fma.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/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 y-scale y-scale))) (*.f64 #s(literal 16 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 y-scale y-scale))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 16 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 b #s(literal 4 binary64)) (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/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 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)) (fma.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/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 y-scale y-scale))))))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 16 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 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)) (fma.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/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 y-scale y-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 b #s(literal 4 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 (*.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 (/.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 (*.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 (fma.f64 (*.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 y-scale y-scale) (*.f64 (*.f64 x-scale x-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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))))) (*.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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 2 binary64) (/.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) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 b b) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #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)) (fma.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/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))))))))))))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 b b) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #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)) (fma.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/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/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/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 b b) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #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)) (fma.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/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/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/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-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)))) (fma.f64 (*.f64 angle angle) (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 (/.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 (*.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 (fma.f64 (*.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 y-scale y-scale) (*.f64 (*.f64 x-scale x-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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 b b))) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #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/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 b b))) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.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 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 #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 a a) (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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 b b))) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #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)) (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 (*.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 #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 (*.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 (*.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 (fma.f64 (*.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 y-scale y-scale) (*.f64 (*.f64 x-scale x-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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 b b))) (*.f64 (*.f64 y-scale y-scale) (*.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 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 (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 (* (/ 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 (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 (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 (/ (/ (+ (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 (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 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))))))) (*.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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))) #s(literal 1/2 binary64)))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (+.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 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))))))) (*.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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))) #s(literal 1/2 binary64)))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (+.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 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))))))) (*.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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))) #s(literal 1/2 binary64))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 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))))))) (*.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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (+.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 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))))))) (*.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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale 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 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale 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) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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 (sin (* (/ angle 180) (PI))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 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))))))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 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))))))) (*.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))))) (pow.f64 (*.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 #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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.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)))))))))))))) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.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))))))))))))) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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)))) (-.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 (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 #s(literal 1/4 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.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)))))))))))) (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)))))))))))))) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (pow.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)))))))) #s(literal 1/2 binary64)))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.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)))))))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.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))))))))))))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.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)))))))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 x-scale x-scale) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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)))) (-.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 (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 #s(literal 1/4 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.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)))))))))))) (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))))))))))))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.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)))))))))))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.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)))))))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (pow.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)))))))) #s(literal 1/2 binary64))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.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)))))))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.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)))))))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.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))))))))))))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.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)))))))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.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)))))))))))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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)))) (-.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 (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 #s(literal 1/4 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.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)))))))))))) (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))))))))))))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))) (*.f64 x-scale x-scale)))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale)))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale)))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 b #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))))))) (*.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))))))))))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (pow (* x-scale y-scale) 2) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))
#s(approx (* x-scale y-scale) (*.f64 x-scale y-scale))
#s(approx 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (sin.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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (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 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 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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/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)))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (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 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 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)))))))) (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/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)))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (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 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 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)))))))) (fma.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/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)))
#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 (*.f64 a a) (*.f64 (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) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/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)))
#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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 x-scale #s(literal 4 binary64))) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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))))) (*.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 x-scale #s(literal 6 binary64))) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 x-scale #s(literal 4 binary64))) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))) x-scale))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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))))) x-scale))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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))))) (*.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))))) x-scale))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))) x-scale))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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))))) x-scale))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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))))) (*.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))))) x-scale))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 y-scale y-scale))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #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))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(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 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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 y-scale y-scale))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale)))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 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 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 b #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))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(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 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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 y-scale y-scale))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)))))) (*.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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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))))) (pow.f64 (*.f64 x-scale y-scale) #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 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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 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)))))))) (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 x-scale #s(literal 4 binary64))) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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))))) (*.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 x-scale #s(literal 6 binary64))) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 x-scale #s(literal 4 binary64))) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))) x-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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))))) x-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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))))) (*.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))))) x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))) x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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))))) x-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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)))) (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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))))) (*.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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 (-.f64 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 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)))))))) (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))))))))) (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale))))))))) y-scale)) (pow.f64 (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) y-scale) (pow.f64 (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 (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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)))))) x-scale)))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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))))) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 #s(literal 1/4 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (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)))) (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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))))) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 #s(literal 1/4 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (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)))) (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (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 (*.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 #s(literal 1/4 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (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)))) (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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))))))) x-scale) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 y-scale y-scale) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 #s(literal 1/4 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (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)))) (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) x-scale) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 y-scale y-scale) (-.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (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 (*.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 #s(literal 1/4 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (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)))) (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 #s(literal 1/4 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (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)))) (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) x-scale) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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))))))) x-scale) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) x-scale) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 #s(literal 1/4 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (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)))) (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) x-scale) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 #s(literal 1/4 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (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)))) (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (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 (*.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 #s(literal 1/4 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (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)))) (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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) (pow.f64 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))))))))) (*.f64 y-scale y-scale)))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 y-scale #s(literal 4 binary64))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 x-scale x-scale)) (*.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 (pow.f64 b #s(literal 4 binary64)) (*.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 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 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))))) (*.f64 x-scale x-scale)))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 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))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #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))))))) (*.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))))))))))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 b b) (*.f64 (sin.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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)))
#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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 b b) (*.f64 (sin.f64 (*.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)))))))) (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 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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 b b) (*.f64 (sin.f64 (*.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)))))))) (fma.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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)))
#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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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)))
#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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.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)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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 #s(literal 1/2 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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)))))))) (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))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.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)))) #s(literal 1/2 binary64)))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.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)))) #s(literal 1/2 binary64)))) y-scale))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.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)))) #s(literal 1/2 binary64))))) y-scale))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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 #s(literal 1/2 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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)))))))) (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))))))))) (pow.f64 y-scale #s(literal 6 binary64)))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.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)))) #s(literal 1/2 binary64)))))) y-scale))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.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)))) #s(literal 1/2 binary64))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.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)))) #s(literal 1/2 binary64)))) y-scale))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.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)))) #s(literal 1/2 binary64))))) y-scale))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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 #s(literal 1/2 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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)))))))) (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))))))))) (pow.f64 y-scale #s(literal 6 binary64)))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.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)))) #s(literal 1/2 binary64)))))) y-scale))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 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))))) (*.f64 y-scale y-scale)))))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 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)))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #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))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 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)))))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)))
#s(approx (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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 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))))))) (*.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 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #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))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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 8 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (*.f64 #s(literal 8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 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)))))) (*.f64 x-scale x-scale)))))) (*.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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/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 (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 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)) (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 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)))) (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)) (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 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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)))) (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)) (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 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))) (pow.f64 (*.f64 x-scale y-scale) #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 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))))) (pow.f64 (*.f64 x-scale y-scale) #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))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.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)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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 #s(literal 1/2 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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)))))))) (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))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64))))))))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.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)))) #s(literal 1/2 binary64))))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.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)))) #s(literal 1/2 binary64)))) y-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.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)))) #s(literal 1/2 binary64))))) y-scale)))
#s(approx (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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 #s(literal 1/2 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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)))))))) (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))))))))) (pow.f64 y-scale #s(literal 6 binary64)))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.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)))) #s(literal 1/2 binary64)))))) y-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (pow.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)))) #s(literal 1/2 binary64)))))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.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)))) #s(literal 1/2 binary64)))) y-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.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)))) #s(literal 1/2 binary64))))) y-scale)))
#s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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 #s(literal 1/2 binary64) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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)))))))) (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))))))))) (pow.f64 y-scale #s(literal 6 binary64)))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.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)))) #s(literal 1/2 binary64)))))) y-scale)))

eval486.0ms (0.5%)

Memory
40.4MiB live, 556.4MiB allocated; 134ms collecting garbage
Compiler

Compiled 587 020 to 8 894 computations (98.5% saved)

prune2.3s (2.6%)

Memory
86.8MiB live, 3 728.0MiB allocated; 530ms collecting garbage
Pruning

12 alts after pruning (12 fresh and 0 done)

PrunedKeptTotal
New1 023121 035
Fresh000
Picked101
Done000
Total1 024121 036
Accuracy
67.3%
Counts
1 036 → 12
Alt Table
Click to see full alt table
StatusAccuracyProgram
2.0%
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (/.f64 (fma.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)) (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 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
6.5%
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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(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))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
3.6%
(/.f64 (neg.f64 #s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (pow.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)))))))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
3.1%
(/.f64 (neg.f64 #s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
▶4.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
5.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
▶3.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
▶45.2%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))))
41.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))))
▶11.5%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
8.8%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
▶35.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
Compiler

Compiled 9 568 to 2 238 computations (76.6% saved)

series3.1s (3.5%)

Memory
43.7MiB live, 4 257.0MiB allocated; 1.5s collecting garbage
Counts
132 → 1 501
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64))))
#s(literal 1/4 binary64)
(*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))
(*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))
y-scale
(pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))
#s(literal 8 binary64)
#s(literal 1/2 binary64)
(pow.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)))))))) #s(literal 1/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))))))))
#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))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))))
(*.f64 b (*.f64 y-scale #s(literal 4 binary64)))
(*.f64 y-scale #s(literal 4 binary64))
#s(literal 4 binary64)
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))
(*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))
x-scale
(pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(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 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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 (*.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))))))
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(*.f64 x-scale y-scale)
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(literal 1/8 binary64)
(*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a))
(*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))))
(*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))
(*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))
(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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 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)))
(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))))))
#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 (*.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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.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 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #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 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))
(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))
(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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #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)
(/.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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))
(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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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 (*.f64 b b) (*.f64 (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 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64))
(+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.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))
(/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))
(fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))
(pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))
(*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))
(*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)))))))))
(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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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 (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)))
(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))))
#s(literal -2 binary64)
(*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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)))
(fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))
(fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(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 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(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 (*.f64 b b) (*.f64 a a))
(pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.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)))) #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))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))
(*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))
(pow.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)))) #s(literal 1/2 binary64))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/4 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 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/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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) a)))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (pow a 2))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* (pow a 2) (* y-scale (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* (pow a 2) (+ (* y-scale (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))) (* (pow a 2) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 3) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 3) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* (pow a 2) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* (pow a 2) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow a 2) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 3) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (/ (* x-scale (* (sqrt 8) (+ (* 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 (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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (+ (/ (* x-scale (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)) (/ (* (pow a 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow y-scale 2)))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* (pow a 2) (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2)))) (/ (* x-scale (* (sqrt 8) (+ (* 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 (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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* (pow a 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow y-scale 2))))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2)))) (/ (* x-scale (* (sqrt 8) (+ (* 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 (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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* x-scale (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* x-scale (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* x-scale (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* x-scale (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 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)))) (* 1/2 (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (+ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 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)))) (* 1/2 (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* (pow a 2) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* (pow a 2) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (+ (* -1/2 (/ (* (pow a 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 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)))) (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow a 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 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))) (* 1/2 (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 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))) (* 1/2 (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* -1 (/ (* (pow a 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 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) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 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))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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))) (* 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))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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))) (+ (* 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 a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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))) (+ (* 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 a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (+ (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (* (pow a 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #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))))
#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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 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)))))
#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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #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 x-scale 2)) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 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)))))
#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 (/ (+ (* (* a a) (* (sin (* 1/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)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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)))))) (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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)))))
#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))))) (* x-scale x-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 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))))))
#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))))) (* x-scale x-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 a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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))))
#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))))) (* x-scale x-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 x-scale 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)))))
#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))))) (* x-scale x-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 x-scale 2))) (/ (* (pow a 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)))) 2) (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)))) (* (* (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 (- (* 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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (* x-scale (sqrt 1/2)) (* b (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/4 (/ (* (pow a 2) (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (* b (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))))) (* x-scale (sqrt 1/2)))) (* -1/4 (/ (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))) (/ (* x-scale (sqrt 1/2)) (* b (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1/4 (/ (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* (pow a 2) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))))) (* x-scale (sqrt 1/2)))) (* -1/2 (/ (* (pow a 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* x-scale (sqrt 1/2)))))))) (/ (* x-scale (sqrt 1/2)) (* b (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (- (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (- (* (pow a 2) (- (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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)))))) (* x-scale x-scale))) (* 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 (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 3) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow b 3) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))))) (* 1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 5) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 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)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* 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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (pow a 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))) (pow a 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* a (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 4) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 4) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 6) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 4) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 6) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 4) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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) (+ (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 4) (pow y-scale 2)))) (+ (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2)))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* (pow b 2) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 6) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 4) (pow y-scale 2)))) (+ (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 4))) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* -1/2 (/ (* (pow b 2) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 4))) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (/ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow a 2))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))) (pow a 4))) (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (/ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow a 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))) (pow a 4))) (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (/ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow a 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))) (pow a 4))) (+ (/ (* (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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* -1/2 (/ (* (pow b 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)))) 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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (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))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))) (pow a 4))) (+ (/ (* (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 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (/ (* (pow a 2) (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 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)))) 2))) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 4) (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)))) 2)))) (+ (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (/ (* (pow b 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)))) 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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 4) (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)))) 2))))) (+ (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) (pow a 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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 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 a 4) (pow x-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-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 x-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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow a 4) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 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)))))))
#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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow a 4) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 2) (pow x-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 x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (/ (+ (* (* a a) (* (sin (* 1/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)) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-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)))))) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 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 a 4) (pow x-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 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (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 (- (* 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 (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (* x-scale (sqrt 1/2)) (* a (sin (* 1/180 (* angle (PI))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 2) (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI)))))) a)))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow a 4) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI))))))) a)))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow a 4) (* x-scale (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (* (pow a 6) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI)))))))) a)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (* 1/2 (/ (pow x-scale 2) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow a 2))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ (- (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow a 2))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ (- (+ (* -1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/2 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow a 2))))
#s(approx (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 a 2) (+ (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (pow x-scale 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* a (+ (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (pow a 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))) (pow a 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (/ (* a (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 4) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 4) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 6) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 4) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 6) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 4) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (* x-scale (sqrt 1/2)) (* a (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI)))))) a))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow a 4) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI))))))) a))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow a 4) (* x-scale (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (* (pow a 6) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI)))))))) a))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (* a (+ (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/4 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 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/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 (* 1/4 (* b (* y-scale 4))) #s(hole binary64 (* b y-scale)))
#s(approx (* b (* y-scale 4)) #s(hole binary64 (* 4 (* b y-scale))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* b (* x-scale (* y-scale (pow 8 1/2)))) #s(hole binary64 (* b (* x-scale (* y-scale (sqrt 8))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (* (pow b 2) (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (* (* (pow b 2) (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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))))))) (sqrt (/ 1 (+ (* 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 (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 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)))))
#s(approx (/ (* b b) (* x-scale x-scale)) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 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))) (- (/ (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)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 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))) (- (/ (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)) (/ (* (* 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 (/ (* (* 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 (* (* 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (* (pow b 2) (+ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* (pow b 2) (+ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* (pow b 2) (* y-scale (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* (pow b 2) (+ (* y-scale (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))) (* (pow b 2) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 3) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 3) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* (pow b 2) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* (pow b 2) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 3) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (+ (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* (pow b 2) (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* (pow b 2) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2))))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (+ (* 1/2 (* (pow b 2) (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (+ (* 1/2 (* (pow b 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (+ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (+ (* 1/2 (* (pow b 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow b 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* (pow b 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* (pow b 2) (- (+ (* -1 (/ (* (pow b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2))) (* 4 (/ (* (pow a 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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2))) (+ (* 4 (/ (* (pow a 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) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2))) (+ (* 4 (/ (* (pow a 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) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (+ (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (* (pow b 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-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))))) (* x-scale x-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 x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-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))))) (* x-scale x-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 x-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 x-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (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 (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (* a (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (/ (* a (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))))) (* x-scale (sqrt 1/2)))) (* -1/4 (/ (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))))) (/ (* x-scale (sqrt 1/2)) (* a (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/4 (/ (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* (pow b 2) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))))) (* x-scale (sqrt 1/2)))) (* -1/2 (/ (* a (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* x-scale (sqrt 1/2)))))))) (/ (* x-scale (sqrt 1/2)) (* a (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow x-scale 2) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow x-scale 2) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (- (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow x-scale 2) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (- (* (pow b 2) (- (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (* 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 (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (/ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* a (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 3) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (/ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow a 3) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))))) (* 1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 5) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (/ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* b (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 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 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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow b 2) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (/ (* a (* x-scale (* y-scale (sqrt 8)))) (pow b 2)) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow b 2) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (/ (* x-scale (* y-scale (sqrt 8))) (pow b 2)) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (pow b 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))) (pow b 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (/ (* b (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* b (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 2) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 4) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 4) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 2) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 6) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 4) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 6) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 4) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 2) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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) (+ (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 2) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 4) (pow y-scale 2)))) (+ (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 2) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2)))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* (pow a 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 6) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 4) (pow y-scale 2)))) (+ (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 2) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow b 2))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow b 4))) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow b 2)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* -1/2 (/ (* (pow a 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow b 4))) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow b 2))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (/ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow b 2))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow b 4))) (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (/ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow b 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow b 4))) (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (/ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow b 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 4))) (+ (/ (* (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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 6) (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))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 4))) (+ (/ (* (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (/ (* (pow b 2) (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 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))) (* 1/2 (PI)))) 2))) (/ (* (pow a 2) (* (pow x-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 x-scale 2))) (* 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))) (* 1/2 (PI)))) 4)))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 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)))) 2))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow x-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 x-scale 2))) (* 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))) (* 1/2 (PI)))) 4))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 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)))) 2))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow x-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 x-scale 2))) (* 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))) (* 1/2 (PI)))) 4))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) (pow b 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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-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 x-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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow b 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow b 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)))))))
#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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow b 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow b 2) (pow x-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 x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (/ (+ (* (* a a) (* (sin (* 1/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)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-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 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (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 (- (* b b) (* a a)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow a 2) (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) b)))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow b 4) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow a 2) (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) b)))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow b 4) (* x-scale (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (* (pow b 6) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow a 2) (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) b)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (/ (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow b 2))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ (- (+ (* 1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow b 2))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ (- (+ (* -1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (* 1/2 (/ (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow b 2))))
#s(approx (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2)))) (* 2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* b (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* b (+ (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (+ (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (pow b 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))) (pow b 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (/ (* b (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 2) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 4) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 4) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 2) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 6) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 4) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 6) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 4) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 2) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (* x-scale (sqrt 1/2)) (* b (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow a 2) (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) b))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow b 4) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow a 2) (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) b))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow b 4) (* x-scale (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (* (pow b 6) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow a 2) (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) b))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (* b (+ (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (+ (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/8 (/ (* angle (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* y-scale (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/2 (/ (* angle (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* y-scale (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* (PI) (cos (* 1/2 (PI)))))) (sqrt 2))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (sqrt 2))) (* 1/2 (/ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 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 (* (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/8 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/2 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (cos (* 1/2 (PI))))) (* x-scale (sqrt 2)))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* x-scale (sqrt 2)))) (* 1/2 (/ (* angle (* x-scale (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* x-scale (sqrt 2)))) (* angle (+ (* 1/2 (/ (* angle (* x-scale (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* x-scale (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 2 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/2 (/ (* angle (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* 1/2 (/ (* angle (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (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 (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2)))))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2)))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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 (/ (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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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))))))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* 1/90 (* angle (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (* (pow y-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) (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (+ (* angle (* (pow y-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 y-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) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow x-scale 2) (pow (PI) 2))))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow x-scale 2) (pow (PI) 4)))) (* 1/32400 (* (pow x-scale 2) (pow (PI) 2)))))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow x-scale 2) (pow (PI) 4))) (* (pow angle 2) (* (pow x-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow x-scale 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow x-scale 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow x-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))))) (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))) (* angle (+ (* a (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* a (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))) (* angle (+ (* a (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))) (* angle (+ (* a (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (+ (* angle (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (+ (* angle (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (+ (* angle (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow a 2))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (+ (/ (* angle (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (pow a 2)) (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow a 2)))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (+ (* angle (+ (/ (* angle (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (pow a 2)) (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))) (pow a 2)))) (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow a 2)))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (+ (* angle (+ (* angle (+ (/ (* angle (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2)) (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))) (pow a 2)))) (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))) (pow a 2)))) (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow a 2)))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (+ (* angle (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (+ (* angle (+ (* angle (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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))))))) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (+ (* angle (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))) (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (+ (* angle (+ (* angle (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))) (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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)))))) (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* angle (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* angle (+ (* angle (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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))))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (+ (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* angle (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (+ (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* angle (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* angle (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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))))))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (pow (sin (* 1/2 (PI))) 2)))))))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (* angle (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 2)))))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (pow (sin (* 1/2 (PI))) 2))))))))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* -2/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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 (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))) (* angle (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* 1/2916000 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* angle (* (pow b 2) (+ (* -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 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* 1/2916000 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (/ (* angle (* (pow b 2) (+ (* -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 2) (+ (* -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 (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* -2/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* angle (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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 (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* 2 (* angle (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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)))))))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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 (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 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)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* (pow x-scale 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)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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 (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* angle (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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 (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* 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 (/ (* (* 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 (* (* 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (* (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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* -1/90 (/ (* angle (* (pow y-scale 2) (* (PI) (cos (* 1/2 (PI)))))) (pow (sin (* 1/2 (PI))) 3))) (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* angle (+ (* -1/2 (/ (* angle (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (pow y-scale 2))) (* -1/90 (/ (* (pow y-scale 2) (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 3))))) (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* angle (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 3))) (* angle (+ (* -1/2 (/ (* angle (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (pow y-scale 2))) (* -1/2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (pow y-scale 2))))))) (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 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) #s(hole binary64 (/ (pow y-scale 4) (pow (sin (* 1/2 (PI))) 4))))
#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) #s(hole binary64 (+ (* -1/45 (/ (* angle (* (pow y-scale 4) (* (PI) (cos (* 1/2 (PI)))))) (pow (sin (* 1/2 (PI))) 5))) (/ (pow y-scale 4) (pow (sin (* 1/2 (PI))) 4)))))
#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) #s(hole binary64 (+ (* angle (- (* -1 (* angle (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (* 1/45 (/ (* (pow y-scale 4) (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 5))))) (/ (pow y-scale 4) (pow (sin (* 1/2 (PI))) 4)))))
#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) #s(hole binary64 (+ (* angle (- (* angle (- (* -1 (* angle (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8)))))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (* 1/45 (/ (* (pow y-scale 4) (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 5))))) (/ (pow y-scale 4) (pow (sin (* 1/2 (PI))) 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 (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)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 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/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 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/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 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 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 (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (+ (* 1/90 (* angle (* (pow b 2) (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (* (pow y-scale 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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/32400 (* (pow b 2) (* (pow x-scale 2) (pow (PI) 2)))) (* (pow b 2) (* (pow y-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 b 2) (* (pow y-scale 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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/32400 (* (pow b 2) (* (pow x-scale 2) (pow (PI) 2)))) (+ (* angle (* (pow b 2) (* (pow y-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 b 2) (* (pow y-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 b 2) (* (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (* (pow x-scale 2) (pow (PI) 2)))))))
#s(approx (* (* x-scale x-scale) (* (* 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 x-scale 2) (pow (PI) 4))))) (* 1/32400 (* (pow b 2) (* (pow x-scale 2) (pow (PI) 2))))))))
#s(approx (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (* (pow x-scale 2) (pow (PI) 2)))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (* (pow x-scale 2) (pow (PI) 4)))) (* (pow angle 2) (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (* (pow x-scale 2) (pow (PI) 2)))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (* (pow x-scale 2) (pow (PI) 4)))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (* (pow x-scale 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))) (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (* y-scale (sqrt 1/2)) (sin (* 1/2 (PI))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/360 (/ (* angle (* y-scale (* (PI) (cos (* 1/2 (PI)))))) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))) (/ (* y-scale (sqrt 1/2)) (sin (* 1/2 (PI)))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* angle (+ (* -1/2 (/ (* angle (* (sin (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* y-scale (sqrt 1/2)))) (* -1/360 (/ (* y-scale (* (PI) (cos (* 1/2 (PI))))) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* y-scale (sqrt 1/2)) (sin (* 1/2 (PI)))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* y-scale (* (PI) (cos (* 1/2 (PI))))) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))) (* angle (+ (* -1/2 (/ (* angle (* (sin (* 1/2 (PI))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))) (* y-scale (sqrt 1/2)))) (* -1/2 (/ (* (sin (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (* y-scale (sqrt 1/2)))))))) (/ (* y-scale (sqrt 1/2)) (sin (* 1/2 (PI)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* -1/180 (/ (* angle (* (pow y-scale 2) (* (PI) (cos (* 1/2 (PI)))))) (pow (sin (* 1/2 (PI))) 3))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (* -1 (* angle (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (* 1/180 (/ (* (pow y-scale 2) (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 3))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (* angle (- (* -1 (* angle (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4))))))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (* 1/180 (/ (* (pow y-scale 2) (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 3))))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 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))))))))))))))))
#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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-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 (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* 1/90 (* angle (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow y-scale 2) (pow (PI) 2))) (+ (* angle (* (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 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow y-scale 2) (pow (PI) 2))))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow y-scale 2) (pow (PI) 4)))) (* 1/32400 (* (pow y-scale 2) (pow (PI) 2)))))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow y-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow y-scale 2) (pow (PI) 4))) (* (pow angle 2) (* (pow y-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow y-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow y-scale 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow y-scale 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow y-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/2 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (cos (* 1/2 (PI))))) (* y-scale (sqrt 2)))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* y-scale (sqrt 2)))) (* 1/2 (/ (* 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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* y-scale (sqrt 2)))) (* angle (+ (* 1/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))))) (* 1/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (+ (* angle (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (+ (* angle (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (+ (* angle (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (+ (* angle (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (/ (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (* x-scale (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (pow y-scale 2)) (/ (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2)))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (+ (/ (* angle (* x-scale (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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 y-scale 2)) (/ (* x-scale (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow y-scale 2)))) (/ (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2)))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (+ (* angle (+ (/ (* angle (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (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)) (/ (* x-scale (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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 y-scale 2)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow y-scale 2)))) (/ (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2)))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* x-scale (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* angle (* x-scale (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* x-scale (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* angle (+ (* angle (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (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 (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* x-scale (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* angle (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* angle (+ (* angle (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* angle (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* angle (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (+ (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* angle (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* angle (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (+ (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* angle (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (+ (* angle (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (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 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* -2 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (+ (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (+ (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (- (+ (* angle (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-scale 2)))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-scale 2))) (* -2/45 (/ (* (pow a 2) (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))) (pow x-scale 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-scale 2))) (* angle (+ (* -2/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-scale 2))) (* angle (+ (* -2/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-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 x-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 x-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 x-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* 1/45 (/ (* (pow a 2) (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))) (pow x-scale 2))) (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-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 x-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 x-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 x-scale 2))))))) (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-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 x-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 x-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 x-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 x-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 x-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 x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-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 (/ (+ (* (* a a) (* (sin (* 1/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)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-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)))))) (* 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 (/ (+ (* (* a a) (* (sin (* 1/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)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (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 (/ (+ (* (* a a) (* (sin (* 1/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)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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 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 (+ (* (* a a) (* (sin (* 1/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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-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))))) (* x-scale x-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 x-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 x-scale 2))) (* 4 (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 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 (- (pow b 2) (pow a 2)) 2))) (pow x-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))))) (* x-scale x-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 x-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 x-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 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 (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 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 (- (pow b 2) (pow a 2)) 2))) (pow x-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))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-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))))) (* x-scale x-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 x-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 x-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 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 (- (pow b 2) (pow a 2)) 2))) (pow x-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))))) (* x-scale x-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 x-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 x-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 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 (- (pow b 2) (pow a 2)) 2))) (pow x-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 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 (- (pow b 2) (pow a 2)) 2))) (pow x-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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (* x-scale (sqrt 1/2)) (* b (sin (* 1/2 (PI)))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/360 (/ (* angle (* x-scale (* (PI) (cos (* 1/2 (PI)))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (* b (sin (* 1/2 (PI))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* angle (+ (* -1/2 (/ (* angle (* b (* (sin (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* x-scale (sqrt 1/2)))) (* -1/360 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))))) (/ (* x-scale (sqrt 1/2)) (* b (sin (* 1/2 (PI))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (* angle (+ (* -1/2 (/ (* angle (* b (* (sin (* 1/2 (PI))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4)))))))))) (* x-scale (sqrt 1/2)))) (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* x-scale (sqrt 1/2)))))))) (/ (* x-scale (sqrt 1/2)) (* b (sin (* 1/2 (PI))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* -1/180 (/ (* angle (* (pow x-scale 2) (* (PI) (cos (* 1/2 (PI)))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 3)))) (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (- (* -1 (* angle (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* 1/180 (/ (* (pow x-scale 2) (* (PI) (cos (* 1/2 (PI))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 3)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (- (* angle (- (* -1 (* angle (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4)))))))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* 1/180 (/ (* (pow x-scale 2) (* (PI) (cos (* 1/2 (PI))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 3)))))))))
#s(approx (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))))))
#s(approx (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))))))) (pow x-scale 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))))) (pow x-scale 2)))))))))))
#s(approx (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 2))) (pow x-scale 2)))))
#s(approx (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 4))) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))
#s(approx (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) #s(hole binary64 (* (pow angle 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 a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (pow x-scale 2))))))))
#s(approx (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) #s(hole binary64 (* (pow angle 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) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (pow x-scale 2)) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))))))))))
#s(approx (* 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 (* 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 (* 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))) (* 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))))))))
#s(approx (* 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 (+ (* 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 x-scale 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))))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (/ (* angle (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/2 (/ (* angle (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* b (* (sin (* 1/2 (PI))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* (PI) (cos (* 1/2 (PI)))))) (* x-scale (sqrt 2)))) (/ (* b (* (sin (* 1/2 (PI))) (sqrt 2))) x-scale))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (* x-scale (sqrt 2)))) (* 1/2 (/ (* angle (* x-scale (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (/ (* b (* (sin (* 1/2 (PI))) (sqrt 2))) x-scale))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (* x-scale (sqrt 2)))) (* angle (+ (* 1/2 (/ (* angle (* x-scale (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (* x-scale (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (/ (* b (* (sin (* 1/2 (PI))) (sqrt 2))) x-scale))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (sqrt (+ (* 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 (* (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 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 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)))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) #s(hole binary64 (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 (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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))) (/ (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 (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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))) (- (/ (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 (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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))) (- (/ (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 (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (* (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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (sqrt (/ 1 (+ (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) #s(hole binary64 (/ 1 (+ (* 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)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (+ (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (/ 1 (+ (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)) (/ (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)) (/ (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 (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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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) (pow (sin (* 1/180 (* angle (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)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* (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)))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 (/ (* (pow x-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 x-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 x-scale 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))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (/ (* (pow x-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 x-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 x-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #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 x-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)))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -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 (cos (* 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 (/ (* (+ (* 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 a 2) (pow (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 (cos (* 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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* x-scale (* y-scale (pow 8 1/2))) #s(hole binary64 (* x-scale (* y-scale (sqrt 8)))))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))) x-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 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 y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (* 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 y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 4)) (pow y-scale 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (/ (+ (* -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))) (* 1/2 (PI)))) 4)) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 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)))) 4)) (pow y-scale 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-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 (/ (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)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (pow (* x-scale y-scale) 2) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (* x-scale y-scale) #s(hole binary64 (* x-scale y-scale)))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (* (pow x-scale 2) (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (* (pow x-scale 2) (+ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (* (pow x-scale 2) (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (+ (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) x-scale)))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (pow a 2))) (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow a 2))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (pow a 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (pow a 2))) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow a 2))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (pow a 2))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))))) (pow a 2))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (pow a 2))))) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow a 2))))) x-scale)))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) x-scale))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))))) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale)))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))))))) (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) x-scale)))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* 1/2 (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))))))))) x-scale)))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (pow x-scale 2)))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))))) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))))))) (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* 1/2 (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))))))))) (pow x-scale 2))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2)))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* 1/2 (* (pow x-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))))) (* 1/2 (* (pow x-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))))))) (pow x-scale 2))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #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) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))))) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* (pow x-scale 2) (+ (* 1/2 (* (pow x-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))) (* 1/2 (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (+ (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))))))))) (pow x-scale 2))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (+ (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (+ (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))) (* (pow x-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))))))))) (pow x-scale 2))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4)))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))))) (pow x-scale 4))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (* 2 (/ (* (pow b 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 4))))))) (pow x-scale 4))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4)))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 2 (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))))) (pow x-scale 4))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-scale 2) (+ (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (* 2 (/ (* (pow b 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 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (+ (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (/ (* (pow b 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 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/2 (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (+ (* -1/2 (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))) (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 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) #s(hole binary64 (/ (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))
#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) #s(hole binary64 (* (pow x-scale 4) (+ (* -1 (* (pow x-scale 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#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) #s(hole binary64 (* (pow x-scale 4) (+ (* (pow x-scale 2) (- (* -1 (* (pow x-scale 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#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) #s(hole binary64 (* (pow x-scale 4) (+ (* (pow x-scale 2) (- (* (pow x-scale 2) (- (* -1 (* (pow x-scale 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 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 (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 (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 2))))
#s(approx (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI)))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* x-scale (+ (* -1/8 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))) (/ (sqrt 1/2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* x-scale (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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))))))) (sqrt 1/2))) (* -1/8 (/ (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (sqrt 1/2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* x-scale (+ (* (pow x-scale 2) (+ (* -1/8 (/ (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))) (sqrt 1/2))) (* -1/2 (/ (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))) (sqrt 1/2))))))) (/ (sqrt 1/2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* 1/2 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/4 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 1/2 (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* (pow x-scale 2) (+ (* (pow x-scale 2) (- (* -1 (* (pow x-scale 2) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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/4 (/ (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 1/2 (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* (pow x-scale 2) (+ (* (pow x-scale 2) (- (* (pow x-scale 2) (- (* -1 (* (pow x-scale 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))))))) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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/4 (/ (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 1/2 (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) #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))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)) (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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* (* y-scale y-scale) (* x-scale x-scale)) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* 1/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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))) x-scale)))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (/ (* x-scale (* (sqrt 8) (+ (* 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)))) 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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* x-scale (* (sqrt 8) (+ (* 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)))) 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))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (sqrt 8) (+ (* 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)))) 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)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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)))) 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))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #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)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* x-scale (sqrt (/ 1 (+ (* 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 (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ (pow x-scale 2) (+ (* 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 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* (sqrt 8) (sqrt (+ (* 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 (* x-scale (pow 8 1/2)) #s(hole binary64 (* x-scale (sqrt 8))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* (/ 1 x-scale) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 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 6) (pow (sin (* 1/180 (* angle (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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 2)))) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (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 x-scale 6) (pow (sin (* 1/180 (* angle (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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (* 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 y-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 y-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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 (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 2) (+ (/ (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* x-scale (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 6)) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* x-scale (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow x-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (* (pow x-scale 4) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 6) (* (pow y-scale 2) (sqrt 1/2)))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt 1/2)))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 6) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow x-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow x-scale 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (* (pow x-scale 6) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (* (pow x-scale 4) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) y-scale)))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* x-scale (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow a 2) y-scale))) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow x-scale 2)))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 2) (pow x-scale 4)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow a 2) y-scale))) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow x-scale 2))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2))))))) (* (pow a 2) (pow x-scale 6)))) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 2) (pow x-scale 4)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow a 2) y-scale))) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) y-scale))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* x-scale (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2)))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2))))))) (pow x-scale 6))) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2)))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2))))))) (pow x-scale 6))) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (pow y-scale 2)))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (pow y-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (pow y-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))) (pow x-scale 6))) (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (pow y-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2)))))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 x-scale 2))) (+ (* 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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 x-scale 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 4))) (+ (* 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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 x-scale 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2))))) (pow x-scale 6))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 4))) (+ (* 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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -1 (/ (* (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 x-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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -1 (/ (* (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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 4) (pow y-scale 6)))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -1 (/ (* (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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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 x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (* (pow x-scale 6) (pow y-scale 6)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 4) (pow y-scale 6)))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow x-scale 6) (pow y-scale 2)))) (+ (* 2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 4)))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (+ (* -8 (/ (* (pow b 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)))) (+ (* 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))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow x-scale 2)))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (+ (* -8 (/ (* (pow b 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)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4))) (+ (* 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))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow x-scale 2))))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 4)))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 4))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow x-scale 2))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4))) (+ (* 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))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow x-scale 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 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow x-scale 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 x-scale 4)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (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 (* -1 (/ (* (pow b 2) (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))) #s(hole binary64 (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (* (pow x-scale 4) (pow y-scale 2)))) (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 6) (pow y-scale 2)))) (+ (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (* (pow x-scale 4) (pow y-scale 2)))) (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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) #s(hole binary64 (/ (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))
#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) #s(hole binary64 (+ (* -1 (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 8)))) (/ (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#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) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (pow x-scale 4))) (/ (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 8))))))
#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) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12)))) (pow x-scale 6))) (/ (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12)))) (+ (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 8))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))
#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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (* (pow b 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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (+ (/ (* (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 (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* (pow x-scale 2) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (* y-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/8 (/ (* (pow y-scale 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6)))))) (* (pow x-scale 4) (* y-scale (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))))))) (* (pow x-scale 6) (* y-scale (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6)))))) (* (pow x-scale 4) (* y-scale (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* 1/2 (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 4) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6)))) (pow x-scale 4))) (* 1/2 (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))))) (pow x-scale 6))) (* 1/2 (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* 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/4 (/ (* (pow y-scale 4) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (+ (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (+ (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (+ (* 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) #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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) #s(hole binary64 (/ (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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 2) (+ (/ (* (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)))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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))))) y-scale) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (/ (* y-scale (sqrt 8)) (pow x-scale 2)) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 6)) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow a 2) y-scale))) (* -1 (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow x-scale 2)))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow a 2) y-scale))) (+ (* -1 (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow x-scale 2)))) (* -1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 2) (pow x-scale 4))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow a 2) y-scale))) (+ (* -1 (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow x-scale 2)))) (+ (* -1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2))))))) (* (pow a 2) (pow x-scale 6)))) (* -1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 2) (pow x-scale 4)))))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (* -1 (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (+ (* -1 (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))) (* -1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 4)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (+ (* -1 (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2))))))) (pow x-scale 6))) (* -1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 4))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/4 (* (/ (* y-scale (sqrt 8)) (pow x-scale 2)) (sqrt (+ (* 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))))))) (* -1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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))))) y-scale) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/4 (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* 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))))))) (* -1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (* x-scale (sqrt (/ 1 (+ (* 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 (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1/4 (* (sqrt 8) (sqrt (+ (* 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 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* (sqrt 8) (sqrt (+ (* 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 (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (* (/ 1 x-scale) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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)))) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (* y-scale (pow 8 1/2)) #s(hole binary64 (* y-scale (sqrt 8))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* y-scale 4) #s(hole binary64 (* 4 y-scale)))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* 1/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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))) y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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 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)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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)))) 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (* 1/2 (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)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (* 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 4)) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (* y-scale y-scale) #s(hole binary64 (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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (/ (+ (* -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)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 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))) (* 1/2 (PI)))) 4)) (pow x-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))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow y-scale 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (/ (* (pow y-scale 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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2))))))) (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow y-scale 2) (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow y-scale 2) (+ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))))) (* (pow y-scale 2) (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (+ (* (pow y-scale 2) (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (+ (* (pow y-scale 2) (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (+ (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (pow a 2))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow a 2))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (pow a 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (pow a 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow a 2))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (pow a 2))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))))) (pow a 2))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (pow a 2))))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow a 2))))) y-scale)))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))))) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) y-scale)))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/2 (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))))))) (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) y-scale)))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (* x-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* 1/2 (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))))))))) y-scale)))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) y-scale)))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) y-scale)))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))))) (* 1/2 (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))))))) y-scale)))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))))) (* 1/2 (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))))))) (pow y-scale 2))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (* (pow y-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))))) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 y-scale 2) (+ (* 1/2 (* (pow y-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))) (* 1/2 (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 y-scale 2))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (+ (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 y-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))))))))) (pow y-scale 2))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (+ (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 y-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (+ (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))) (* (pow y-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))))))))) (pow y-scale 2))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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 x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))))) (pow y-scale 4))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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 x-scale 2))) (+ (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))) (* 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 x-scale 4))))))) (pow y-scale 4))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 2 (* (pow y-scale 2) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow y-scale 4))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow y-scale 2) (+ (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))) (* 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 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))) 4)) (pow x-scale 2))) (+ (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 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 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (* (pow y-scale 2) (+ (* -1/2 (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/2 (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow y-scale 2) (+ (* -1/2 (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))) (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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) #s(hole binary64 (* (pow y-scale 4) (+ (* -1 (* (pow y-scale 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#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) #s(hole binary64 (* (pow y-scale 4) (+ (* (pow y-scale 2) (- (* -1 (* (pow y-scale 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#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) #s(hole binary64 (* (pow y-scale 4) (+ (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1 (* (pow y-scale 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 (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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (pow y-scale 2))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* y-scale (+ (* -1/8 (/ (* (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)))) 3) (sqrt 1/2)))) (/ (sqrt 1/2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* y-scale (+ (* (pow y-scale 2) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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))))))) (sqrt 1/2))) (* -1/8 (/ (+ (* 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)))) 3) (sqrt 1/2)))))) (/ (sqrt 1/2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* y-scale (+ (* (pow y-scale 2) (+ (* -1/8 (/ (+ (* 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)))) 3) (sqrt 1/2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))) (sqrt 1/2))) (* -1/2 (/ (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2))))))))) (sqrt 1/2))))))) (/ (sqrt 1/2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* (pow y-scale 2) (+ (* -1/4 (/ (* (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)))) 4))) (* 1/2 (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* (pow y-scale 2) (+ (* (pow y-scale 2) (- (* -1 (* (pow y-scale 2) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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/4 (/ (+ (* 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)))) 4))))) (* 1/2 (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* (pow y-scale 2) (+ (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1 (* (pow y-scale 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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/4 (/ (+ (* 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)))) 4))))) (* 1/2 (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* 1/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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (PI)))) (sqrt 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))) y-scale)))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) y-scale) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* (pow y-scale 2) (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) y-scale)))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* (pow y-scale 2) (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 1/2 (PI)))) 2)))) (+ (* 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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 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))) (* 1/2 (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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) (* 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))) (* 1/2 (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 x-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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (+ (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* y-scale (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 6)) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* y-scale (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* y-scale (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (* (pow y-scale 4) (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* y-scale (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 6) (sqrt 1/2)))))) (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt 1/2)))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 6) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (* (pow y-scale 6) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (* (pow y-scale 4) (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* y-scale (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) x-scale))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2)))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow a 2) (pow y-scale 4)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) x-scale))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2))))))) (* (pow a 2) (pow y-scale 6)))) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow a 2) (pow y-scale 4)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) x-scale))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* y-scale (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) x-scale)) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) x-scale)) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2))))))) (pow y-scale 6))) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) x-scale)) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* y-scale (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))) (pow y-scale 6))) (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))) (pow y-scale 6))) (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 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))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow y-scale 4))) (+ (* 2 (/ (* (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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2))))) (pow y-scale 6))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow y-scale 4))) (+ (* 2 (/ (* (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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 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)))) (+ (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 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)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 6) (pow y-scale 4)))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 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)))) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 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 6) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* (pow x-scale 6) (pow y-scale 6)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 6) (pow y-scale 4)))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow x-scale 2) (pow y-scale 6)))) (+ (* 2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (+ (* -8 (/ (* (pow b 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)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (pow y-scale 2)))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (+ (* -8 (/ (* (pow b 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)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4))) (+ (* 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))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (pow y-scale 2))))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (pow y-scale 2))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4))) (+ (* 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))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 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)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow x-scale 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 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (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 y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (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 y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (* (pow x-scale 2) (pow y-scale 4)))) (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (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 y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (pow y-scale 6)))) (+ (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (* (pow x-scale 2) (pow y-scale 4)))) (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 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) #s(hole binary64 (+ (* -1 (/ (* (pow x-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 8)))) (/ (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#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) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))) (pow y-scale 4))) (/ (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow x-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 8))))))
#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) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12)))) (pow y-scale 6))) (/ (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 12)))) (+ (/ (* (pow x-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 8))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))
#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 (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* (pow y-scale 2) (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/8 (/ (* (pow x-scale 3) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6)))))) (* x-scale (* (pow y-scale 4) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 3) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))) (* x-scale (* (pow y-scale 6) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6)))))) (* x-scale (* (pow y-scale 4) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 3) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* -1/4 (/ (* (pow x-scale 4) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6)))) (pow y-scale 4))) (* 1/2 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))))) (pow y-scale 6))) (* 1/2 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/8 (/ (* (pow x-scale 6) (- (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)))) 6)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (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 x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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 (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (+ (/ (* (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)))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 6)) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) x-scale))) (* -1 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2)))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) x-scale))) (+ (* -1 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2)))) (* -1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow a 2) (pow y-scale 4))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) x-scale))) (+ (* -1 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2)))) (+ (* -1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2))))))) (* (pow a 2) (pow y-scale 6)))) (* -1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow a 2) (pow y-scale 4)))))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) x-scale)) (* -1 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) x-scale)) (+ (* -1 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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))) (* -1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) x-scale)) (+ (* -1 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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))) (+ (* -1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2))))))) (pow y-scale 6))) (* -1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (pow y-scale 4))))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (* -1 (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (+ (* -1 (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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))) (* -1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow y-scale 4)))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (+ (* -1 (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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))) (+ (* -1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))) (pow y-scale 6))) (* -1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow y-scale 4))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))))))
Calls

15 calls:

TimeVariablePointExpression
393.0ms
a
@inf
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (* y-scale (pow 8 1/2)) y-scale (pow 8 1/2) 8 1/2 (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* 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) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* b (* y-scale 4))) (* b (* y-scale 4)) (* y-scale 4) 4 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) x-scale (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (* y-scale y-scale) (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow (* x-scale y-scale) 2) (* x-scale y-scale) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))))) -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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)))))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) -1 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* y-scale y-scale) (* x-scale x-scale)) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale))) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (- (* b b) (* a a)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))
224.0ms
angle
@-inf
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (* y-scale (pow 8 1/2)) y-scale (pow 8 1/2) 8 1/2 (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* 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) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* b (* y-scale 4))) (* b (* y-scale 4)) (* y-scale 4) 4 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) x-scale (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (* y-scale y-scale) (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow (* x-scale y-scale) 2) (* x-scale y-scale) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))))) -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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)))))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) -1 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* y-scale y-scale) (* x-scale x-scale)) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale))) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (- (* b b) (* a a)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))
195.0ms
x-scale
@0
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (* y-scale (pow 8 1/2)) y-scale (pow 8 1/2) 8 1/2 (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* 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) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* b (* y-scale 4))) (* b (* y-scale 4)) (* y-scale 4) 4 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) x-scale (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (* y-scale y-scale) (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow (* x-scale y-scale) 2) (* x-scale y-scale) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))))) -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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)))))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) -1 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* y-scale y-scale) (* x-scale x-scale)) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale))) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (- (* b b) (* a a)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))
190.0ms
y-scale
@0
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (* y-scale (pow 8 1/2)) y-scale (pow 8 1/2) 8 1/2 (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* 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) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* b (* y-scale 4))) (* b (* y-scale 4)) (* y-scale 4) 4 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) x-scale (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (* y-scale y-scale) (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow (* x-scale y-scale) 2) (* x-scale y-scale) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))))) -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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)))))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) -1 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* y-scale y-scale) (* x-scale x-scale)) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale))) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (- (* b b) (* a a)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))
189.0ms
angle
@0
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (* y-scale (pow 8 1/2)) y-scale (pow 8 1/2) 8 1/2 (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+ (* 2 (* (* a a) (* (sin (* 1/180 (* 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) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* b (* y-scale 4))) (* b (* y-scale 4)) (* y-scale 4) 4 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) x-scale (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (* y-scale y-scale) (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow (* x-scale y-scale) 2) (* x-scale y-scale) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))))) -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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)))))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) -1 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* y-scale y-scale) (* x-scale x-scale)) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)) (+ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale))) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)) (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (- (* b b) (* a a)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))

rewrite2.8s (3.2%)

Memory
27.5MiB live, 3 560.8MiB allocated; 1.5s collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
010169847835
010483847835
010483821191
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
1 633 → 1 649
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64))))
#s(literal 1/4 binary64)
(*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))
(*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))
y-scale
(pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))
#s(literal 8 binary64)
#s(literal 1/2 binary64)
(pow.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)))))))) #s(literal 1/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))))))))
#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))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))))
(*.f64 b (*.f64 y-scale #s(literal 4 binary64)))
(*.f64 y-scale #s(literal 4 binary64))
#s(literal 4 binary64)
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))
(*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))
x-scale
(pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(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 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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 (*.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))))))
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(*.f64 x-scale y-scale)
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(literal 1/8 binary64)
(*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a))
(*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))))
(*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))
(*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))
(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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 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)))
(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))))))
#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 (*.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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.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 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #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 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))
(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))
(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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #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)
(/.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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))
(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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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 (*.f64 b b) (*.f64 (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 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64))
(+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.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))
(/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))
(fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))
(pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))
(*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))
(*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)))))))))
(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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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 (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)))
(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))))
#s(literal -2 binary64)
(*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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)))
(fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))
(fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(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 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(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 (*.f64 b b) (*.f64 a a))
(pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.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)))) #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))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))
(*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))
(pow.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)))) #s(literal 1/2 binary64))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/4 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 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/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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) a)))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (pow a 2))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* (pow a 2) (* y-scale (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* (pow a 2) (+ (* y-scale (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))) (* (pow a 2) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 3) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 3) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* (pow a 2) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* (pow a 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* (pow a 2) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* (pow a 2) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 3) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (/ (* x-scale (* (sqrt 8) (+ (* 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 (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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (+ (/ (* x-scale (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)) (/ (* (pow a 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow y-scale 2)))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* (pow a 2) (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2)))) (/ (* x-scale (* (sqrt 8) (+ (* 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 (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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* (pow a 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow y-scale 2))))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow y-scale 2)))) (/ (* x-scale (* (sqrt 8) (+ (* 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 (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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* x-scale (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* x-scale (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* x-scale (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* x-scale (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 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)))) (* 1/2 (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (+ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 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)))) (* 1/2 (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* (pow a 2) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* (pow a 2) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (+ (* -1/2 (/ (* (pow a 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 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)))) (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow a 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 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))) (* 1/2 (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 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))) (* 1/2 (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow a 2) (- (+ (* (pow a 2) (- (+ (* -1 (/ (* (pow a 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 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) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 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))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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))) (* 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))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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))) (+ (* 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 a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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))) (+ (* 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 a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (+ (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (* (pow a 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #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))))
#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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 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)))))
#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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #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 x-scale 2)) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 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)))))
#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 (/ (+ (* (* a a) (* (sin (* 1/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)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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)))))) (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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)))))
#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))))) (* x-scale x-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 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))))))
#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))))) (* x-scale x-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 a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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))))
#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))))) (* x-scale x-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 x-scale 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)))))
#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))))) (* x-scale x-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 x-scale 2))) (/ (* (pow a 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)))) 2) (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)))) (* (* (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 (- (* 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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (* x-scale (sqrt 1/2)) (* b (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/4 (/ (* (pow a 2) (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (* b (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))))) (* x-scale (sqrt 1/2)))) (* -1/4 (/ (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))) (/ (* x-scale (sqrt 1/2)) (* b (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1/4 (/ (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* (pow a 2) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))))) (* x-scale (sqrt 1/2)))) (* -1/2 (/ (* (pow a 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* x-scale (sqrt 1/2)))))))) (/ (* x-scale (sqrt 1/2)) (* b (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (- (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow a 2) (- (* (pow a 2) (- (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 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)))))) (* x-scale x-scale))) (* 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 (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 3) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow b 3) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))))) (* 1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 5) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 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)))))
#s(approx (+ (* 2 (* (* a a) (* (sin (* 1/180 (* 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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (pow a 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))) (pow a 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (/ (* a (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* a (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 4) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 4) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 6) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 4) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 6) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 4) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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) (+ (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 4) (pow y-scale 2)))) (+ (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2)))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* (pow b 2) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 6) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 4) (pow y-scale 2)))) (+ (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 4))) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* -1/2 (/ (* (pow b 2) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 4))) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (/ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow a 2))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))) (pow a 4))) (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (/ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow a 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))) (pow a 4))) (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (/ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow a 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))) (pow a 4))) (+ (/ (* (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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* -1/2 (/ (* (pow b 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)))) 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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (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))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))) (pow a 4))) (+ (/ (* (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 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (/ (* (pow a 2) (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 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)))) 2))) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 4) (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)))) 2)))) (+ (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow a 2) (- (+ (* -1 (/ (* (pow b 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)))) 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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 4) (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)))) 2))))) (+ (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) (pow a 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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 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 a 4) (pow x-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-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 x-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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow a 4) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 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)))))))
#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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow a 4) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 2) (pow x-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 x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (/ (+ (* (* a a) (* (sin (* 1/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)) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-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)))))) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 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 a 4) (pow x-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 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (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 (- (* 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 (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (* x-scale (sqrt 1/2)) (* a (sin (* 1/180 (* angle (PI))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 2) (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI)))))) a)))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow a 4) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI))))))) a)))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow a 4) (* x-scale (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (* (pow a 6) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI)))))))) a)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (* 1/2 (/ (pow x-scale 2) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow a 2))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ (- (+ (* 1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow a 2))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ (- (+ (* -1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/2 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow a 2))))
#s(approx (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 a 2) (+ (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (pow x-scale 2)))) (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* a (+ (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (pow a 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))) (pow a 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (/ (* a (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 4) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 4) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 6) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 4) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 6) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 4) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (* x-scale (sqrt 1/2)) (* a (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI)))))) a))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow a 4) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI))))))) a))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow a 4) (* x-scale (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (* (pow a 6) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI)))))))) a))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (* a (+ (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (+ (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/4 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 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/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 (* 1/4 (* b (* y-scale 4))) #s(hole binary64 (* b y-scale)))
#s(approx (* b (* y-scale 4)) #s(hole binary64 (* 4 (* b y-scale))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* b (* x-scale (* y-scale (pow 8 1/2)))) #s(hole binary64 (* b (* x-scale (* y-scale (sqrt 8))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* (pow b 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (* (pow b 2) (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (* (* (pow b 2) (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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))))))) (sqrt (/ 1 (+ (* 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 (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 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)))))
#s(approx (/ (* b b) (* x-scale x-scale)) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 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))) (- (/ (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)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 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))) (- (/ (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)) (/ (* (* 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 (/ (* (* 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 (* (* 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (* (pow b 2) (+ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* (pow b 2) (+ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* (pow b 2) (* y-scale (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* (pow b 2) (+ (* y-scale (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))) (* (pow b 2) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 3) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 3) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* (pow b 2) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* (pow b 2) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 3) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (+ (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow y-scale 2)))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* (pow b 2) (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* (pow b 2) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2))))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (+ (* 1/2 (* (pow b 2) (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (+ (* 1/2 (* (pow b 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (+ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (+ (* 1/2 (* (pow b 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow b 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* (pow b 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow b 2) (- (+ (* (pow b 2) (- (+ (* -1 (/ (* (pow b 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2))) (* 4 (/ (* (pow a 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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2))) (+ (* 4 (/ (* (pow a 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) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2))) (+ (* 4 (/ (* (pow a 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) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (+ (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (* (pow b 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-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))))) (* x-scale x-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 x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-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))))) (* x-scale x-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 x-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 x-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))) (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (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 (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (* a (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (/ (* a (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))))) (* x-scale (sqrt 1/2)))) (* -1/4 (/ (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))))) (/ (* x-scale (sqrt 1/2)) (* a (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/4 (/ (* x-scale (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* (pow b 2) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))))) (* x-scale (sqrt 1/2)))) (* -1/2 (/ (* a (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* x-scale (sqrt 1/2)))))))) (/ (* x-scale (sqrt 1/2)) (* a (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow x-scale 2) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow x-scale 2) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (- (* 1/2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow x-scale 2) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (- (* (pow b 2) (- (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#s(approx (* 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 (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (/ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* a (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 3) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (/ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow a 3) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))))) (* 1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 5) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* x-scale (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (/ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* b (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 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 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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow b 2) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (/ (* a (* x-scale (* y-scale (sqrt 8)))) (pow b 2)) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow b 2) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (/ (* x-scale (* y-scale (sqrt 8))) (pow b 2)) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (pow b 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))) (pow b 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (/ (* b (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* b (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 2) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 4) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 4) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 2) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 6) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 4) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 6) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 4) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 2) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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) (+ (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 2) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 4) (pow y-scale 2)))) (+ (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 2) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2)))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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/2 (/ (* (pow a 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 6) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 4) (pow y-scale 2)))) (+ (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 2) (pow y-scale 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow b 2))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow b 4))) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow b 2)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* -1/2 (/ (* (pow a 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow b 4))) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow b 2))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (/ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow b 2))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow b 4))) (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (/ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow b 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow b 4))) (+ (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (/ (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow b 2))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 4))) (+ (/ (* (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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 6) (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))) (* 1/2 (PI)))) 2))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2))) (+ (* 1/2 (/ (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow b 4))) (+ (/ (* (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (/ (* (pow b 2) (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 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))) (* 1/2 (PI)))) 2))) (/ (* (pow a 2) (* (pow x-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 x-scale 2))) (* 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))) (* 1/2 (PI)))) 4)))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 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)))) 2))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow x-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 x-scale 2))) (* 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))) (* 1/2 (PI)))) 4))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow b 2) (- (+ (* -1 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 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)))) 2))) (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow x-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 x-scale 2))) (* 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))) (* 1/2 (PI)))) 4))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) (pow b 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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-scale 2)))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-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 x-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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow b 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow b 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)))))))
#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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* (pow b 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow b 2) (pow x-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 x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (/ (+ (* (* a a) (* (sin (* 1/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)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-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 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2)))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) (* (* (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 (- (* b b) (* a a)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow a 2) (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) b)))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow b 4) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow a 2) (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) b)))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow b 4) (* x-scale (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (* (pow b 6) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow a 2) (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) b)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (/ (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow b 2))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ (- (+ (* 1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))) (pow b 2))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ (- (+ (* -1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (* 1/2 (/ (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/2 (/ (* (pow a 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (pow b 2))))
#s(approx (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2)))) (* 2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* b (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* b (+ (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (+ (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (pow b 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))) (pow b 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (/ (* b (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 2) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 4) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 4) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 2) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 4) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 6) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 6) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 4) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 6) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 4) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 2) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (* x-scale (sqrt 1/2)) (* b (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow a 2) (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) b))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow b 4) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow a 2) (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) b))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (* (pow b 4) (* x-scale (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (* (pow b 6) (* x-scale (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow a 2) (* x-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) b))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (* b (+ (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (+ (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/8 (/ (* angle (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* y-scale (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/2 (/ (* angle (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* y-scale (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* (PI) (cos (* 1/2 (PI)))))) (sqrt 2))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (sqrt 2))) (* 1/2 (/ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 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 (* (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/8 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/2 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (cos (* 1/2 (PI))))) (* x-scale (sqrt 2)))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* x-scale (sqrt 2)))) (* 1/2 (/ (* angle (* x-scale (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* x-scale (sqrt 2)))) (* angle (+ (* 1/2 (/ (* angle (* x-scale (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* x-scale (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 2 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/2 (/ (* angle (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* 1/2 (/ (* angle (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (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 (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2)))))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2)))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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 (/ (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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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))))))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* 1/90 (* angle (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (* (pow y-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) (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (+ (* angle (* (pow y-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 y-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) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow x-scale 2) (pow (PI) 2))))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow x-scale 2) (pow (PI) 4)))) (* 1/32400 (* (pow x-scale 2) (pow (PI) 2)))))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow x-scale 2) (pow (PI) 4))) (* (pow angle 2) (* (pow x-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow x-scale 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow x-scale 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow x-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))))) (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))) (* angle (+ (* a (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* a (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))) (* angle (+ (* a (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))) (* angle (+ (* a (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (+ (* angle (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (+ (* angle (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (+ (* angle (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow a 2))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (+ (/ (* angle (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (pow a 2)) (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow a 2)))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (+ (* angle (+ (/ (* angle (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (pow a 2)) (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))) (pow a 2)))) (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow a 2)))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (+ (* angle (+ (* angle (+ (/ (* angle (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2)) (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))) (pow a 2)))) (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))) (pow a 2)))) (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (pow a 2)))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (+ (* angle (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (+ (* angle (+ (* angle (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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))))))) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (+ (* angle (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))) (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (+ (* angle (+ (* angle (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))) (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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)))))) (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* y-scale (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* angle (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* angle (+ (* angle (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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))))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (+ (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* angle (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (+ (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* angle (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* angle (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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))))))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (pow (sin (* 1/2 (PI))) 2)))))))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (* angle (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 2)))))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (pow (sin (* 1/2 (PI))) 2))))))))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* -2/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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 (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))) (* angle (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* 1/2916000 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* angle (* (pow b 2) (+ (* -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 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* 1/2916000 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (/ (* angle (* (pow b 2) (+ (* -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 2) (+ (* -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 (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* -2/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* angle (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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 (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* 2 (* angle (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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)))))))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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 (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 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)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* (pow x-scale 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)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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 (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/2 (PI))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* angle (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* angle (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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 (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* 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 (/ (* (* 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 (* (* 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (* (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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* -1/90 (/ (* angle (* (pow y-scale 2) (* (PI) (cos (* 1/2 (PI)))))) (pow (sin (* 1/2 (PI))) 3))) (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* angle (+ (* -1/2 (/ (* angle (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (pow y-scale 2))) (* -1/90 (/ (* (pow y-scale 2) (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 3))))) (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* angle (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 3))) (* angle (+ (* -1/2 (/ (* angle (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (pow y-scale 2))) (* -1/2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (pow y-scale 2))))))) (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 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) #s(hole binary64 (/ (pow y-scale 4) (pow (sin (* 1/2 (PI))) 4))))
#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) #s(hole binary64 (+ (* -1/45 (/ (* angle (* (pow y-scale 4) (* (PI) (cos (* 1/2 (PI)))))) (pow (sin (* 1/2 (PI))) 5))) (/ (pow y-scale 4) (pow (sin (* 1/2 (PI))) 4)))))
#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) #s(hole binary64 (+ (* angle (- (* -1 (* angle (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (* 1/45 (/ (* (pow y-scale 4) (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 5))))) (/ (pow y-scale 4) (pow (sin (* 1/2 (PI))) 4)))))
#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) #s(hole binary64 (+ (* angle (- (* angle (- (* -1 (* angle (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8)))))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (* 1/45 (/ (* (pow y-scale 4) (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 5))))) (/ (pow y-scale 4) (pow (sin (* 1/2 (PI))) 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 (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)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 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/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 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/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 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 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 (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (+ (* 1/90 (* angle (* (pow b 2) (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (* (pow y-scale 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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/32400 (* (pow b 2) (* (pow x-scale 2) (pow (PI) 2)))) (* (pow b 2) (* (pow y-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 b 2) (* (pow y-scale 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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow b 2) (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/32400 (* (pow b 2) (* (pow x-scale 2) (pow (PI) 2)))) (+ (* angle (* (pow b 2) (* (pow y-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 b 2) (* (pow y-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 b 2) (* (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (* (pow x-scale 2) (pow (PI) 2)))))))
#s(approx (* (* x-scale x-scale) (* (* 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 x-scale 2) (pow (PI) 4))))) (* 1/32400 (* (pow b 2) (* (pow x-scale 2) (pow (PI) 2))))))))
#s(approx (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (* (pow x-scale 2) (pow (PI) 2)))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (* (pow x-scale 2) (pow (PI) 4)))) (* (pow angle 2) (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (* (pow x-scale 2) (pow (PI) 2)))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (* (pow x-scale 2) (pow (PI) 4)))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (* (pow x-scale 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))) (* (pow b 2) (* (pow x-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (* y-scale (sqrt 1/2)) (sin (* 1/2 (PI))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/360 (/ (* angle (* y-scale (* (PI) (cos (* 1/2 (PI)))))) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))) (/ (* y-scale (sqrt 1/2)) (sin (* 1/2 (PI)))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* angle (+ (* -1/2 (/ (* angle (* (sin (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* y-scale (sqrt 1/2)))) (* -1/360 (/ (* y-scale (* (PI) (cos (* 1/2 (PI))))) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* y-scale (sqrt 1/2)) (sin (* 1/2 (PI)))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* y-scale (* (PI) (cos (* 1/2 (PI))))) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))) (* angle (+ (* -1/2 (/ (* angle (* (sin (* 1/2 (PI))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))) (* y-scale (sqrt 1/2)))) (* -1/2 (/ (* (sin (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (* y-scale (sqrt 1/2)))))))) (/ (* y-scale (sqrt 1/2)) (sin (* 1/2 (PI)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* -1/180 (/ (* angle (* (pow y-scale 2) (* (PI) (cos (* 1/2 (PI)))))) (pow (sin (* 1/2 (PI))) 3))) (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (* -1 (* angle (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (* 1/180 (/ (* (pow y-scale 2) (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 3))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow y-scale 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (* angle (- (* -1 (* angle (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4))))))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (* 1/180 (/ (* (pow y-scale 2) (* (PI) (cos (* 1/2 (PI))))) (pow (sin (* 1/2 (PI))) 3))))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 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))))))))))))))))
#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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-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 (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* 1/90 (* angle (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow y-scale 2) (pow (PI) 2))) (+ (* angle (* (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 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow y-scale 2) (pow (PI) 2))))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow y-scale 2) (pow (PI) 4)))) (* 1/32400 (* (pow y-scale 2) (pow (PI) 2)))))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow y-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow y-scale 2) (pow (PI) 4))) (* (pow angle 2) (* (pow y-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow y-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow y-scale 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow y-scale 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow y-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/2 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (cos (* 1/2 (PI))))) (* y-scale (sqrt 2)))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* y-scale (sqrt 2)))) (* 1/2 (/ (* 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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* y-scale (sqrt 2)))) (* angle (+ (* 1/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))))) (* 1/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (+ (* angle (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (+ (* angle (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (+ (* angle (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (+ (* angle (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (/ (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (* x-scale (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (pow y-scale 2)) (/ (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2)))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (+ (/ (* angle (* x-scale (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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 y-scale 2)) (/ (* x-scale (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow y-scale 2)))) (/ (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2)))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (+ (* angle (+ (/ (* angle (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (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)) (/ (* x-scale (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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 y-scale 2)))) (/ (* x-scale (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (pow y-scale 2)))) (/ (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))) (pow y-scale 2)))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* x-scale (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* angle (* x-scale (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* x-scale (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* angle (+ (* angle (* x-scale (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (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 (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* x-scale (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* x-scale (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* angle (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (+ (* angle (+ (* angle (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* angle (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* angle (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (+ (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* angle (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* angle (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (+ (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* angle (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI)))))))) (+ (* angle (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (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 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (* -2 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (+ (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* -2 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* angle (- (+ (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (- (+ (* angle (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-scale 2)))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-scale 2))) (* -2/45 (/ (* (pow a 2) (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))) (pow x-scale 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-scale 2))) (* angle (+ (* -2/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-scale 2))) (* angle (+ (* -2/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-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 x-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 x-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 x-scale 2))))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* 1/45 (/ (* (pow a 2) (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))) (pow x-scale 2))) (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-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 x-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 x-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 x-scale 2))))))) (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow a 2) (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-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 x-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 x-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 x-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 x-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 x-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 x-scale 2)))))))) (/ (* (pow a 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))) (pow x-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 (/ (+ (* (* a a) (* (sin (* 1/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)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-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)))))) (* 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 (/ (+ (* (* a a) (* (sin (* 1/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)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (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 (/ (+ (* (* a a) (* (sin (* 1/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)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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 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 (+ (* (* a a) (* (sin (* 1/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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-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))))) (* x-scale x-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 x-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 x-scale 2))) (* 4 (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 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 (- (pow b 2) (pow a 2)) 2))) (pow x-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))))) (* x-scale x-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 x-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 x-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 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 (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))))) (* 4 (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 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 (- (pow b 2) (pow a 2)) 2))) (pow x-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))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-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))))) (* x-scale x-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 x-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 x-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 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 (- (pow b 2) (pow a 2)) 2))) (pow x-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))))) (* x-scale x-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 x-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 x-scale 2))) (* angle (+ (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 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 (- (pow b 2) (pow a 2)) 2))) (pow x-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 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 (- (pow b 2) (pow a 2)) 2))) (pow x-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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (* x-scale (sqrt 1/2)) (* b (sin (* 1/2 (PI)))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/360 (/ (* angle (* x-scale (* (PI) (cos (* 1/2 (PI)))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (* b (sin (* 1/2 (PI))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* angle (+ (* -1/2 (/ (* angle (* b (* (sin (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))))) (* x-scale (sqrt 1/2)))) (* -1/360 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))))) (/ (* x-scale (sqrt 1/2)) (* b (sin (* 1/2 (PI))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* x-scale (* (PI) (cos (* 1/2 (PI))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (* angle (+ (* -1/2 (/ (* angle (* b (* (sin (* 1/2 (PI))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4)))))))))) (* x-scale (sqrt 1/2)))) (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* x-scale (sqrt 1/2)))))))) (/ (* x-scale (sqrt 1/2)) (* b (sin (* 1/2 (PI))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* -1/180 (/ (* angle (* (pow x-scale 2) (* (PI) (cos (* 1/2 (PI)))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 3)))) (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (- (* -1 (* angle (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* 1/180 (/ (* (pow x-scale 2) (* (PI) (cos (* 1/2 (PI))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 3)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* 1/2 (/ (pow x-scale 2) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (- (* angle (- (* -1 (* angle (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4)))))))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (* 1/180 (/ (* (pow x-scale 2) (* (PI) (cos (* 1/2 (PI))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 3)))))))))
#s(approx (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))))))
#s(approx (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))))))) (pow x-scale 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))))) (pow x-scale 2)))))))))))
#s(approx (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) #s(hole binary64 (* 1/32400 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 2))) (pow x-scale 2)))))
#s(approx (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 4))) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))
#s(approx (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) #s(hole binary64 (* (pow angle 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 a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (pow x-scale 2))))))))
#s(approx (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) #s(hole binary64 (* (pow angle 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) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (pow x-scale 2)) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))))))))))
#s(approx (* 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 (* 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 (* 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))) (* 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))))))))
#s(approx (* 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 (+ (* 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 x-scale 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))))) (pow x-scale 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (/ (* angle (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/2 (/ (* angle (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* b (* (sin (* 1/2 (PI))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* (PI) (cos (* 1/2 (PI)))))) (* x-scale (sqrt 2)))) (/ (* b (* (sin (* 1/2 (PI))) (sqrt 2))) x-scale))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (* x-scale (sqrt 2)))) (* 1/2 (/ (* angle (* x-scale (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (/ (* b (* (sin (* 1/2 (PI))) (sqrt 2))) x-scale))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (* x-scale (sqrt 2)))) (* angle (+ (* 1/2 (/ (* angle (* x-scale (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (* x-scale (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (/ (* b (* (sin (* 1/2 (PI))) (sqrt 2))) x-scale))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (sqrt (+ (* 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 (* (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 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 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)))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) #s(hole binary64 (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 (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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))) (/ (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 (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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))) (- (/ (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 (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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))) (- (/ (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 (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (* (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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (sqrt (/ 1 (+ (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) #s(hole binary64 (/ 1 (+ (* 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)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (+ (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (/ 1 (+ (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)) (/ (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)) (/ (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 (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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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) (pow (sin (* 1/180 (* angle (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)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* (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)))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 (/ (* (pow x-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 x-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 x-scale 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))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #s(hole binary64 (/ (* (pow x-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 x-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 x-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) #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 x-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)))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -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 (cos (* 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 (/ (* (+ (* 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 a 2) (pow (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 (cos (* 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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* x-scale (* y-scale (pow 8 1/2))) #s(hole binary64 (* x-scale (* y-scale (sqrt 8)))))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))) x-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 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 y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (* 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 y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 4)) (pow y-scale 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (/ (+ (* -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))) (* 1/2 (PI)))) 4)) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 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)))) 4)) (pow y-scale 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-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 (/ (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)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (pow (* x-scale y-scale) 2) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (* x-scale y-scale) #s(hole binary64 (* x-scale y-scale)))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (* (pow x-scale 2) (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (* (pow x-scale 2) (+ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (* (pow x-scale 2) (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (+ (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) x-scale)))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (pow a 2))) (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow a 2))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (pow a 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (pow a 2))) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow a 2))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (pow a 2))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))))) (pow a 2))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (pow a 2))))) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow a 2))))) x-scale)))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) x-scale))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))))) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) x-scale)))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))))))) (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) x-scale)))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* 1/2 (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))))))))) x-scale)))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (pow x-scale 2)))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))))) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))))))) (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow x-scale 2))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* 1/2 (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))))))))) (pow x-scale 2))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2)))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* 1/2 (* (pow x-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow x-scale 2))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* (pow x-scale 2) (+ (* 1/2 (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))))) (* 1/2 (* (pow x-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))))))) (pow x-scale 2))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #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) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))))) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* (pow x-scale 2) (+ (* 1/2 (* (pow x-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))) (* 1/2 (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (+ (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))))))))) (pow x-scale 2))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (+ (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (+ (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))) (* (pow x-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))))))))) (pow x-scale 2))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4)))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))))) (pow x-scale 4))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (* 2 (/ (* (pow b 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 4))))))) (pow x-scale 4))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4)))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 2 (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))))) (pow x-scale 4))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow x-scale 2) (+ (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))) (* 2 (/ (* (pow b 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 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (+ (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))) (/ (* (pow b 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 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/2 (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (* (pow x-scale 2) (+ (* -1/2 (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))) (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 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) #s(hole binary64 (/ (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))
#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) #s(hole binary64 (* (pow x-scale 4) (+ (* -1 (* (pow x-scale 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#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) #s(hole binary64 (* (pow x-scale 4) (+ (* (pow x-scale 2) (- (* -1 (* (pow x-scale 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 4))))))
#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) #s(hole binary64 (* (pow x-scale 4) (+ (* (pow x-scale 2) (- (* (pow x-scale 2) (- (* -1 (* (pow x-scale 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))) (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 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 (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 (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (pow x-scale 2))))
#s(approx (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI)))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* x-scale (+ (* -1/8 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))) (/ (sqrt 1/2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* x-scale (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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))))))) (sqrt 1/2))) (* -1/8 (/ (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (sqrt 1/2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* x-scale (+ (* (pow x-scale 2) (+ (* -1/8 (/ (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))) (sqrt 1/2))) (* -1/2 (/ (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))) (sqrt 1/2))))))) (/ (sqrt 1/2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* 1/2 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/4 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* 1/2 (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* (pow x-scale 2) (+ (* (pow x-scale 2) (- (* -1 (* (pow x-scale 2) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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/4 (/ (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 1/2 (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* (pow x-scale 2) (+ (* (pow x-scale 2) (- (* (pow x-scale 2) (- (* -1 (* (pow x-scale 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))))))) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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/4 (/ (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* 1/2 (/ 1 (pow (sin (* 1/180 (* angle (PI)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) #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))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)) (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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* (* y-scale y-scale) (* x-scale x-scale)) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* 1/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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))) x-scale)))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (/ (* x-scale (* (sqrt 8) (+ (* 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)))) 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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* x-scale (* (sqrt 8) (+ (* 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)))) 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))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (* (sqrt 8) (+ (* 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)))) 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)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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)))) 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))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) #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)))) 2)) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale 2))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* x-scale (sqrt (/ 1 (+ (* 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 (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) #s(hole binary64 (/ (pow x-scale 2) (+ (* 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 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* (sqrt 8) (sqrt (+ (* 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 (* x-scale (pow 8 1/2)) #s(hole binary64 (* x-scale (sqrt 8))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* (/ 1 x-scale) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 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 6) (pow (sin (* 1/180 (* angle (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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 2)))) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (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 x-scale 6) (pow (sin (* 1/180 (* angle (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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (* 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 y-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 y-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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 (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 2) (+ (/ (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* x-scale (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 6)) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* x-scale (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow x-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (* (pow x-scale 4) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 6) (* (pow y-scale 2) (sqrt 1/2)))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt 1/2)))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 6) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow x-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow x-scale 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (* (pow x-scale 6) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (* (pow x-scale 4) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) y-scale)))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* x-scale (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow a 2) y-scale))) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow x-scale 2)))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 2) (pow x-scale 4)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow a 2) y-scale))) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow x-scale 2))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2))))))) (* (pow a 2) (pow x-scale 6)))) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 2) (pow x-scale 4)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow a 2) y-scale))) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow x-scale 2)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) y-scale))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* x-scale (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2)))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2))))))) (pow x-scale 6))) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2)))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2))))))) (pow x-scale 6))) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (pow y-scale 2)))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (pow y-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (pow y-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))) (pow x-scale 6))) (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (pow y-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2)))))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 x-scale 2))) (+ (* 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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 x-scale 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 4))) (+ (* 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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 x-scale 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2))))) (pow x-scale 6))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 4))) (+ (* 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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -1 (/ (* (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 x-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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -1 (/ (* (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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 4) (pow y-scale 6)))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -1 (/ (* (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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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 x-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (* (pow x-scale 6) (pow y-scale 6)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (* (pow x-scale 4) (pow y-scale 6)))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (* (pow x-scale 6) (pow y-scale 2)))) (+ (* 2 (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 4))) (+ (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2))))))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 4)))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (+ (* -8 (/ (* (pow b 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)))) (+ (* 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))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow x-scale 2)))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (+ (* -8 (/ (* (pow b 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)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4))) (+ (* 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))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow x-scale 2))))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 4)))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 4))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow x-scale 2))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4))) (+ (* 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))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow x-scale 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 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow x-scale 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 x-scale 4)) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (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 (* -1 (/ (* (pow b 2) (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))) #s(hole binary64 (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (* (pow x-scale 4) (pow y-scale 2)))) (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))) (* (pow x-scale 6) (pow y-scale 2)))) (+ (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (* (pow x-scale 4) (pow y-scale 2)))) (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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) #s(hole binary64 (/ (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))
#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) #s(hole binary64 (+ (* -1 (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 8)))) (/ (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))
#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) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))) (pow x-scale 4))) (/ (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 8))))))
#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) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12)))) (pow x-scale 6))) (/ (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12)))) (+ (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 8))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))
#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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (* (pow b 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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (+ (/ (* (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 (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* (pow x-scale 2) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (/ (* y-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/8 (/ (* (pow y-scale 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6)))))) (* (pow x-scale 4) (* y-scale (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))))))) (* (pow x-scale 6) (* y-scale (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6)))))) (* (pow x-scale 4) (* y-scale (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (sqrt 1/2)) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* 1/2 (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 4) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6)))) (pow x-scale 4))) (* 1/2 (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))))) (pow x-scale 6))) (* 1/2 (/ (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (+ (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* 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/4 (/ (* (pow y-scale 4) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (+ (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (+ (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (+ (* 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) #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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) #s(hole binary64 (/ (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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 2) (+ (/ (* (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)))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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))))) y-scale) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (/ (* y-scale (sqrt 8)) (pow x-scale 2)) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 6)) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow a 2) y-scale))) (* -1 (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow x-scale 2)))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow a 2) y-scale))) (+ (* -1 (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow x-scale 2)))) (* -1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 2) (pow x-scale 4))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow a 2) y-scale))) (+ (* -1 (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (pow x-scale 2)))) (+ (* -1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2))))))) (* (pow a 2) (pow x-scale 6)))) (* -1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 2) (pow x-scale 4)))))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (* -1 (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (+ (* -1 (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))) (* -1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 4)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) y-scale)) (+ (* -1 (/ (* y-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))) (+ (* -1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2))))))) (pow x-scale 6))) (* -1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 4))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/4 (* (/ (* y-scale (sqrt 8)) (pow x-scale 2)) (sqrt (+ (* 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))))))) (* -1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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))))) y-scale) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/4 (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* 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))))))) (* -1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* -1 (* x-scale (sqrt (/ 1 (+ (* 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 (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1/4 (* (sqrt 8) (sqrt (+ (* 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 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* (sqrt 8) (sqrt (+ (* 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 (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) #s(hole binary64 (* -1 (* (/ 1 x-scale) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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)))) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (* y-scale (pow 8 1/2)) #s(hole binary64 (* y-scale (sqrt 8))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* y-scale 4) #s(hole binary64 (* 4 y-scale)))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* 1/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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))) y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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 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)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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)))) 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (* 1/2 (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)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (* 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 4)) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (* y-scale y-scale) #s(hole binary64 (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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (/ (+ (* -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)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 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))) (* 1/2 (PI)))) 4)) (pow x-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))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow y-scale 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (/ (* (pow y-scale 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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2))))))) (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow y-scale 2) (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow y-scale 2) (+ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))))) (* (pow y-scale 2) (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (+ (* (pow y-scale 2) (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (+ (* (pow y-scale 2) (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (+ (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (pow a 2))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow a 2))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (pow a 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (pow a 2))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow a 2))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (pow a 2))) (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))))) (pow a 2))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (pow a 2))))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow a 2))))) y-scale)))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))))) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) y-scale)))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/2 (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))))))) (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) y-scale)))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* 1/2 (* x-scale (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* 1/2 (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))))))))) y-scale)))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) y-scale)))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) y-scale)))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))))) (* 1/2 (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))))))) y-scale)))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (pow y-scale 2))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))))) (* 1/2 (* (pow y-scale 2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))))))) (pow y-scale 2))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (pow y-scale 2))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (* (pow y-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))))) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 y-scale 2) (+ (* 1/2 (* (pow y-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))) (* 1/2 (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow y-scale 2))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 y-scale 2))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (+ (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 y-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))))))))) (pow y-scale 2))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (+ (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 y-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (+ (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))) (* (pow y-scale 2) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))))))))) (pow y-scale 2))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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 x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))))) (pow y-scale 4))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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 x-scale 2))) (+ (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))) (* 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 x-scale 4))))))) (pow y-scale 4))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* 2 (* (pow y-scale 2) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow y-scale 4))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow y-scale 2) (+ (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))) (* 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 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))) 4)) (pow x-scale 2))) (+ (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 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 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (* (pow y-scale 2) (+ (* -1/2 (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/2 (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (* (pow y-scale 2) (+ (* (pow y-scale 2) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow y-scale 2) (+ (* -1/2 (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))) (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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) #s(hole binary64 (* (pow y-scale 4) (+ (* -1 (* (pow y-scale 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#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) #s(hole binary64 (* (pow y-scale 4) (+ (* (pow y-scale 2) (- (* -1 (* (pow y-scale 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))
#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) #s(hole binary64 (* (pow y-scale 4) (+ (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1 (* (pow y-scale 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 (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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (pow y-scale 2))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* y-scale (+ (* -1/8 (/ (* (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)))) 3) (sqrt 1/2)))) (/ (sqrt 1/2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* y-scale (+ (* (pow y-scale 2) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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))))))) (sqrt 1/2))) (* -1/8 (/ (+ (* 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)))) 3) (sqrt 1/2)))))) (/ (sqrt 1/2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (* y-scale (+ (* (pow y-scale 2) (+ (* -1/8 (/ (+ (* 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)))) 3) (sqrt 1/2)))) (* (pow y-scale 2) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))) (sqrt 1/2))) (* -1/2 (/ (* (pow y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2))))))))) (sqrt 1/2))))))) (/ (sqrt 1/2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* (pow y-scale 2) (+ (* -1/4 (/ (* (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)))) 4))) (* 1/2 (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* (pow y-scale 2) (+ (* (pow y-scale 2) (- (* -1 (* (pow y-scale 2) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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/4 (/ (+ (* 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)))) 4))))) (* 1/2 (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (* (pow y-scale 2) (+ (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* -1 (* (pow y-scale 2) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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/4 (/ (+ (* 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)))) 4))))) (* 1/2 (/ 1 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* 1/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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (PI)))) (sqrt 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))) y-scale)))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) y-scale) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* (pow y-scale 2) (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) y-scale)))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* (pow y-scale 2) (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 1/2 (PI)))) 2)))) (+ (* 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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 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))) (* 1/2 (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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) (* 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))) (* 1/2 (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 x-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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (+ (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* y-scale (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 6)) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* y-scale (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* y-scale (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (* (pow y-scale 4) (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* y-scale (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 6) (sqrt 1/2)))))) (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt 1/2)))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 6) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (* (pow y-scale 6) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (* (pow y-scale 4) (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* y-scale (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) x-scale))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2)))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow a 2) (pow y-scale 4)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) x-scale))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2))))))) (* (pow a 2) (pow y-scale 6)))) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow a 2) (pow y-scale 4)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) x-scale))) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* y-scale (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) x-scale)) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) x-scale)) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2))))))) (pow y-scale 6))) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) x-scale)) (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* y-scale (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))) (pow y-scale 6))) (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))) (pow y-scale 6))) (+ (* 1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 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))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow y-scale 4))) (+ (* 2 (/ (* (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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2))))) (pow y-scale 6))) (+ (* 1/2 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (pow y-scale 4))) (+ (* 2 (/ (* (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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 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)))) (+ (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 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)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 6) (pow y-scale 4)))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 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)))) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 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 6) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* (pow x-scale 6) (pow y-scale 6)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (* (pow x-scale 6) (pow y-scale 4)))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (* (pow x-scale 2) (pow y-scale 6)))) (+ (* 2 (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 4))) (+ (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (+ (* -8 (/ (* (pow b 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)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (pow y-scale 2)))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (+ (* -8 (/ (* (pow b 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)))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4))) (+ (* 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))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (pow y-scale 2))))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (pow y-scale 2))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 4))) (+ (* 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))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 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)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow x-scale 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 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (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 y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (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 y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (* (pow x-scale 2) (pow y-scale 4)))) (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (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 y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 2) (pow y-scale 6)))) (+ (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (* (pow x-scale 2) (pow y-scale 4)))) (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 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) #s(hole binary64 (+ (* -1 (/ (* (pow x-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 8)))) (/ (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
#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) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))) (pow y-scale 4))) (/ (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (* (pow x-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 8))))))
#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) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12)))) (pow y-scale 6))) (/ (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 12)))) (+ (/ (* (pow x-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 8))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))
#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 (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) #s(hole binary64 (* (pow y-scale 2) (+ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/8 (/ (* (pow x-scale 3) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6)))))) (* x-scale (* (pow y-scale 4) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 3) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) #s(hole binary64 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))) (* x-scale (* (pow y-scale 6) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6)))))) (* x-scale (* (pow y-scale 4) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 3) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (sqrt 1/2)) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (+ (* -1/4 (/ (* (pow x-scale 4) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6)))) (pow y-scale 4))) (* 1/2 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) #s(hole binary64 (- (+ (* -1 (/ (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))))) (pow y-scale 6))) (* 1/2 (/ (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/8 (/ (* (pow x-scale 6) (- (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)))) 6)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (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 x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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 (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (+ (/ (* (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)))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 6)) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) x-scale))) (* -1 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2)))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) x-scale))) (+ (* -1 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2)))) (* -1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow a 2) (pow y-scale 4))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) x-scale))) (+ (* -1 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow y-scale 2)))) (+ (* -1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2))))))) (* (pow a 2) (pow y-scale 6)))) (* -1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow a 2) (pow y-scale 4)))))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) x-scale)) (* -1 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) x-scale)) (+ (* -1 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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))) (* -1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (pow y-scale 4)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) x-scale)) (+ (* -1 (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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))) (+ (* -1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2))))))) (pow y-scale 6))) (* -1/2 (/ (* x-scale (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (pow y-scale 4))))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (* -1 (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (+ (* -1 (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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))) (* -1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow y-scale 4)))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (pow x-scale 2))) (+ (* -1 (/ (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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))) (+ (* -1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))) (pow y-scale 6))) (* -1/2 (/ (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (pow y-scale 4))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))))))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64))))
#s(literal 1/4 binary64)
(*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))
(*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))
y-scale
(pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))
#s(literal 8 binary64)
#s(literal 1/2 binary64)
(pow.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)))))))) #s(literal 1/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 (*.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))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))))
(*.f64 b (*.f64 y-scale #s(literal 4 binary64)))
(*.f64 y-scale #s(literal 4 binary64))
#s(literal 4 binary64)
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))
(*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))
x-scale
(pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(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 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (*.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 (*.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))))))
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(*.f64 x-scale y-scale)
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
(*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(literal 1/8 binary64)
(*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a))
(*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))))
(*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))
(*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))))
(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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))
(+.f64 (*.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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 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)))
(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 #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))))))
#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 (*.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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.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 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #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 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))
(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))
(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)))))
(*.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)
(/.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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64)))
(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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #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 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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 (*.f64 b b) (*.f64 (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 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64))
(+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.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))
(/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))
(fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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 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 y-scale y-scale) (*.f64 x-scale x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))
(pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
(*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))
(*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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))
(*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)))))))))
(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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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 (*.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)))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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)))
(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 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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))))
#s(literal -2 binary64)
(*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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)))
(fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #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 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 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 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(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 (*.f64 b b) (*.f64 a a))
(pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(pow.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)))) #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))))
(+.f64 (*.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 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))
(*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))
(pow.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)))) #s(literal 1/2 binary64))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.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))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.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)))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (/.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(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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.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)))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (/.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(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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal -1/4 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))))))) (-.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 (*.f64 (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 (/.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 #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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (/.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(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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/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 6 binary64))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) a) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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))))))))) a))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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))))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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)) (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 (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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 6 binary64))) (*.f64 (pow.f64 b #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)))))) (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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 3 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 3 binary64))))) (*.f64 #s(literal -1/8 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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)) (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 (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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 6 binary64))) (*.f64 (pow.f64 b #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)))))) (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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 3 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 3 binary64))))) (*.f64 #s(literal -1/8 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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)) (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 (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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 6 binary64))) (*.f64 (pow.f64 b #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)))))) (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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 3 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 3 binary64))))) (*.f64 #s(literal -1/8 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 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 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 a #s(literal 2 binary64)) (fma.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))))))))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 a #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 a #s(literal 2 binary64)) (fma.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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)) (fma.f64 #s(literal -1/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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)))))))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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)) (pow.f64 (sin.f64 (fma.f64 #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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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)) (pow.f64 (sin.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)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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)) (pow.f64 (sin.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)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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)) (pow.f64 (sin.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)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.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 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (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 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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (sin.f64 (fma.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (/.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)) (pow.f64 (sin.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (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 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)) (pow.f64 (sin.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (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 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)) (pow.f64 (sin.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (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 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)) (pow.f64 (sin.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 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(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-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 x-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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (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 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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* (* a a) (* (sin (+ (* 1/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 (/ (+ (* (* a a) (* (sin (* 1/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)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (/ (+ (* (* a a) (* (sin (* 1/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)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* (* a a) (* (sin (* 1/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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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))))) (* x-scale x-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 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(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))))) (* x-scale x-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 x-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 x-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 x-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))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-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 x-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))))) (* x-scale x-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 x-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 x-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 x-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 (- (* 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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (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 b (*.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 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 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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.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 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 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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 b (*.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 (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)) (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 (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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 6 binary64))) (*.f64 (pow.f64 b #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 x-scale (sqrt.f64 #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x-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))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x-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)))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x-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 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 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 (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 4 binary64)) (pow.f64 (sin.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 (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x-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 a #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 6 binary64)))) (*.f64 (pow.f64 b #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/2 binary64) (/.f64 (*.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))) (*.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 (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 4 binary64)) (pow.f64 (sin.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)))))) (* x-scale x-scale))) (* 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 (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 a #s(literal 2 binary64)) (pow.f64 (sin.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 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 (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) x-scale))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (+.f64 (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) 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))) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 b #s(literal 3 binary64)) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) x-scale)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 3 binary64)) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/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 6 binary64))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) x-scale)))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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 (/.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))))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal -1/4 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))))))) (-.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))))))) (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/2 binary64) (/.f64 (*.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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 (/.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 (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 (/.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))))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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 (/.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))))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 a (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 #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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 a (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (/.f64 (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 a (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 6 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)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 6 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))))))))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 6 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (fma.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #s(literal 2 binary64))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))) (fma.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #s(literal 2 binary64)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))) (fma.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #s(literal 2 binary64))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (fma.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #s(literal 2 binary64))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))) (fma.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #s(literal 2 binary64)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))) (fma.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #s(literal 2 binary64))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (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)))))) (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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64)))) (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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (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)))))) (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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64)))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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 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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64)))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 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))))))) (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (/.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 a #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 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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #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 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)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (*.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 (fma.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 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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (/.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 a #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 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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #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 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)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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 (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 x-scale #s(literal 2 binary64)))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 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)))) (*.f64 (pow.f64 a #s(literal 4 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))) (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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (*.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 x-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 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)))))))
#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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (*.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 x-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 x-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 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))))))))
#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 (/ (+ (* (* a a) (* (sin (* 1/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)) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (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 (/ (+ (* (* a a) (* (sin (* 1/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)) (*.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))) (*.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 (+ (* (* a a) (* (sin (* 1/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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 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)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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))))) (* x-scale x-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 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))))))
#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))))) (* x-scale x-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 x-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 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)))))))
#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 (- (* 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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) a))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x-scale #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 (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 a #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/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 a #s(literal 2 binary64))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 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 6 binary64)))) (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (/.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 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 6 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 b #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 4 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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 a #s(literal 2 binary64)) (pow.f64 (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 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) (*.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-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 (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 a (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 a (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 a (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) x-scale))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 a (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) 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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) 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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) 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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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 (/.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))))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal -1/4 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))))))) (-.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))))))) (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/2 binary64) (/.f64 (*.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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 (/.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 (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 (/.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))))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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 (/.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))))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 6 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)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 6 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 a #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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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))))))))))))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) a)))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a)))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a)))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) x-scale)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) 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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) 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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) 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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.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) (+.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.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) (+.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (/.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 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.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) (+.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (/.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 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal -1/4 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))))))) (-.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 (*.f64 (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 (/.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 #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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (/.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 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (/.f64 (*.f64 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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (/.f64 (*.f64 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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #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)) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.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 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#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 (* 1/4 (* b (* y-scale 4))) (*.f64 b y-scale))
#s(approx (* b (* y-scale 4)) (*.f64 #s(literal 4 binary64) (*.f64 b y-scale)))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* x-scale (* y-scale (pow 8 1/2)))) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) a) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 a #s(literal 2 binary64))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (*.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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)))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (/ (* b b) (* x-scale x-scale)) (/.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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)) (/ (* (* 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 (/ (* (* 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 (* (* 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.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 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.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 y-scale #s(literal 2 binary64)) (pow.f64 (sin.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 (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.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)))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.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/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.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/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.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/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.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/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.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/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal -1/8 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)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.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/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.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/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 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)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (pow.f64 y-scale #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 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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 2 binary64)) (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/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 6 binary64))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 3 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))))) (*.f64 #s(literal -1/8 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))) (*.f64 #s(literal 1/8 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.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/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.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/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 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)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 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)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (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/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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 2 binary64)) (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/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 6 binary64))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 3 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))))) (*.f64 #s(literal -1/8 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))) (*.f64 #s(literal 1/8 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (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 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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 2 binary64)) (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/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 6 binary64))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 3 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))))) (*.f64 #s(literal -1/8 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 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 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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)) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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)) (fma.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (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 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 #s(literal 1/2 binary64) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 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 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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)) (fma.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (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 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 binary64) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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)))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 binary64) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 binary64) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 1/2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 binary64) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (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 (fma.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 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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 #s(literal 1/2 binary64) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #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))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (fma.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (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 (fma.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 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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 (*.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-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 x-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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (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 x-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 x-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 x-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 x-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))))) (* x-scale x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-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 x-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))))) (* x-scale x-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 x-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 x-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))))) (* x-scale x-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 x-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 x-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 x-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 (- (* b b) (* a a)) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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 2 binary64)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.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/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 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 2 binary64))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 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 2 binary64))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.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/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 2 binary64)) (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/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 6 binary64))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))))) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 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/2 binary64) (/.f64 (pow.f64 x-scale #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 (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x-scale #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)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 a #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 (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 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 (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x-scale #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)) (-.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)))) (*.f64 (pow.f64 a #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/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))) (*.f64 (pow.f64 a #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 (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 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 (* 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 (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 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)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 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)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #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 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 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)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (+.f64 (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) 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))) (*.f64 a (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (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)) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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 a (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) x-scale)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.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 5 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 a (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) x-scale)))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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(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 (/.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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal -1/4 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))))))) (-.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))))))) (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/2 binary64) (/.f64 (*.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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(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 (/.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 (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 (/.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 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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(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 (/.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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 b (fma.f64 #s(literal 1/4 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/4 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 b (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 b (fma.f64 #s(literal -1/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 (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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 b (fma.f64 #s(literal -1/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 (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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.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 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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) a) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) a) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 b (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 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 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 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.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 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (pow.f64 b #s(literal 6 binary64))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 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 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 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.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 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 b (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 b #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #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 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 b #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 y-scale #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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #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 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 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 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 8 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)))))) (pow.f64 (sin.f64 (fma.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 b #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 6 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 3 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 b #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 6 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 y-scale #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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #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 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 6 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64))))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (fma.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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))) (fma.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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)))))))
#s(approx (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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))) (fma.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (fma.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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))) (fma.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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)))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (fma.f64 #s(literal -1/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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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))) (fma.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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))))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (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)))))) (pow.f64 (sin.f64 (fma.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (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)))))) (pow.f64 (sin.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (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)))))) (pow.f64 (sin.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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))) (+.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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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)) (fma.f64 #s(literal -1/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)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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 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 (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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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))) (+.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 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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))))))) (pow.f64 (sin.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 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 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 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 (fma.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 a #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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))))) (*.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 2 binary64))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 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 (fma.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 a #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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))))) (*.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 2 binary64))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 x-scale #s(literal 2 binary64)))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 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))) (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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (*.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 x-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 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)))))))
#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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (*.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 x-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 x-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 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))))))))
#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 (/ (+ (* (* a a) (* (sin (* 1/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)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* (* a a) (* (sin (* 1/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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 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))))))
#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))))) (* x-scale x-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 x-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 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)))))))
#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 (- (* 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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (pow.f64 (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 (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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) b))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.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/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (pow.f64 (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 (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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) b))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.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/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.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/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 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 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 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (pow.f64 (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 (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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) b))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 4 binary64)))) (*.f64 #s(literal 1/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))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.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 6 binary64)))) (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 4 binary64)))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (/.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 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 6 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 8 binary64)))) (*.f64 #s(literal 1/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 a #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)))) (*.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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 4 binary64))))))) (pow.f64 b #s(literal 2 binary64))))
#s(approx (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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)) (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))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))) (*.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 x-scale #s(literal 2 binary64)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 b (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 b (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 b (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) 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))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 b (fma.f64 #s(literal -1/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 (pow.f64 b #s(literal 4 binary64)) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 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)))) (sqrt.f64 #s(literal 2 binary64))) 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))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 b (fma.f64 #s(literal -1/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 (pow.f64 b #s(literal 4 binary64)) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 6 binary64)) (*.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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 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)))) (sqrt.f64 #s(literal 2 binary64))) 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))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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(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 (/.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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal -1/4 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))))))) (-.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))))))) (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/2 binary64) (/.f64 (*.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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(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 (/.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 (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 (/.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 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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(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 (/.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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/4 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/4 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/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 (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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/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 (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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 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 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 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.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 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (pow.f64 b #s(literal 6 binary64))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 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 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 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.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 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 b #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #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 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 b #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 y-scale #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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #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 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 b #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 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 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 8 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)))))) (pow.f64 (sin.f64 (fma.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 b #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 6 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 3 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 b #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 6 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 y-scale #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 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #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 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (pow.f64 (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 (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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) b)))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.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/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (pow.f64 (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 (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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) b)))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.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/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.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/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 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 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 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (pow.f64 (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 (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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) b)))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) x-scale)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) 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))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/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 (pow.f64 b #s(literal 4 binary64)) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 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)))) (sqrt.f64 #s(literal 2 binary64))) 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))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/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 (pow.f64 b #s(literal 4 binary64)) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 6 binary64)) (*.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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 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)))) (sqrt.f64 #s(literal 2 binary64))) 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))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (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))) (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 #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 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 #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 #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 (*.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)) (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 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.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 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))) (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 #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)))))))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (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))) (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 #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 b (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 angle #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 (sqrt.f64 #s(literal 8 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))) (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))) (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 #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 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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/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 (*.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 (*.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/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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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))) (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 #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 (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/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 #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 (*.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)) (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 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.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 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))) (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 #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)))))))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 #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 #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 (*.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)) (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 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.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 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))) (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 #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)))))))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #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/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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #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/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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (-.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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (-.f64 (*.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 #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/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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.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 #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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 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 (cos.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 1/32400 binary64) (/.f64 (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 x-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 x-scale #s(literal 2 binary64))) (*.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 (PI.f64) #s(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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (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 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)))))) (pow.f64 x-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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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))) (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 x-scale #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 #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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 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 (cos.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 1/32400 binary64) (/.f64 (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 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 (cos.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 1/32400 binary64) (/.f64 (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 x-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 x-scale #s(literal 2 binary64))) (*.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 (PI.f64) #s(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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (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 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)))))) (pow.f64 x-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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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))) (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 x-scale #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 #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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 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 (cos.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 1/32400 binary64) (/.f64 (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 x-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 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 (cos.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 1/32400 binary64) (/.f64 (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 x-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 x-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 x-scale #s(literal 2 binary64))) (*.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 (PI.f64) #s(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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (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 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)))))) (pow.f64 x-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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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))) (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 x-scale #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 #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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-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 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 (cos.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 1/32400 binary64) (/.f64 (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (*.f64 #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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/45 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 #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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #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))) (*.f64 angle (fma.f64 #s(literal 1/45 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))) (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 x-scale #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 #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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #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))) (*.f64 angle (fma.f64 #s(literal 1/45 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))) (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 x-scale #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))) (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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #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/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))) (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 x-scale #s(literal 2 binary64))) (*.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 (PI.f64) #s(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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (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 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)))))) (pow.f64 x-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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (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 (PI.f64) #s(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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (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 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)))))) (pow.f64 x-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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (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)))))))) (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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) (/.f64 (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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (PI.f64) (*.f64 (cos.f64 (*.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 (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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (PI.f64) (*.f64 (cos.f64 (*.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 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (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 (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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (PI.f64) (*.f64 (cos.f64 (*.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 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (PI.f64) #s(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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (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 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)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (/.f64 (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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (/.f64 (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 (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (PI.f64) (*.f64 (cos.f64 (*.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 (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 (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (PI.f64) (*.f64 (cos.f64 (*.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 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 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 #s(literal 1/32400 binary64) (/.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (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 (PI.f64) (*.f64 (cos.f64 (*.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 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 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 #s(literal 1/32400 binary64) (/.f64 (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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (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 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)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (/.f64 (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 (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (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)) (/ (* (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 (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)) (/ (* (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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #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 (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)) (/ (* (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 (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 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #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 (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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (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))) (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 x-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)))))))) (/.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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 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))) (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 x-scale #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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (pow.f64 y-scale #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 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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 y-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 y-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 angle (*.f64 (pow.f64 y-scale #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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (* (* x-scale x-scale) (* (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 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (* x-scale x-scale) (* (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 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (* x-scale x-scale) (* (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 x-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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 (* (* x-scale x-scale) (* (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 x-scale #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 x-scale #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 x-scale #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 x-scale #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 angle (fma.f64 a (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 angle (fma.f64 a (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 angle (fma.f64 a (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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 (*.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/16200 binary64) (/.f64 (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (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))) (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.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))) (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 5 binary64))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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 #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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.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))) (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)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (fma.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/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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/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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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) (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.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))) (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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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 (*.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/16200 binary64) (/.f64 (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (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))) (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.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))) (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 5 binary64))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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 #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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.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))) (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)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (fma.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/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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/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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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) (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.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))) (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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 angle (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 angle (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 angle (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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 (*.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/16200 binary64) (/.f64 (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (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))) (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.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))) (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 5 binary64))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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 #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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.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))) (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)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (fma.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/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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/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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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) (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (+.f64 (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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))))))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (fma.f64 angle (+.f64 (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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))))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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)))))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (fma.f64 angle (fma.f64 angle (+.f64 (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.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))) (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)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (fma.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/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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/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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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) (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-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 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)))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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)))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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)))))))))) (pow.f64 a #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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))))))) (pow.f64 a #s(literal 2 binary64)))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (fma.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (fma.f64 angle (fma.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.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))) (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)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (fma.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/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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/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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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) (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-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 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 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (fma.f64 angle (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (fma.f64 angle (fma.f64 angle (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.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))) (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)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (fma.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/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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/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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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) (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-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 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 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (fma.f64 angle (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (fma.f64 angle (fma.f64 angle (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.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))) (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)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (fma.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/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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/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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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) (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-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 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 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal -1 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 (*.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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal -1 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))) (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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (*.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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal -1 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))) (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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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/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) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal -1 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))) (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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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/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) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #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) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.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))) (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)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (fma.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/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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/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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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) (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-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 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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (*.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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (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 -2/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 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))))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (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 -2/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))) (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/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (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 -2/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))) (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/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (fma.f64 angle (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.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))) (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)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (fma.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/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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/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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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) (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-scale #s(literal 2 binary64)))))))))) (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)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 -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 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -2/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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -2/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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64))))))))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -2/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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64))))) (*.f64 angle (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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) (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-scale #s(literal 2 binary64)))))))))))))))))
#s(approx (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 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 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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 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 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 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)))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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 2 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 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (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 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)))) (*.f64 angle (fma.f64 #s(literal 1/2916000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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 2 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 2 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 (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 -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 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -2/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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -2/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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 angle (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -2/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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 2 binary64) (*.f64 angle (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-scale #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #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)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 (pow.f64 x-scale #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)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 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 (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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 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 (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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 angle (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-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)) (-.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 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 (*.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 (/ (* (* 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 (* (* 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (* (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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (/.f64 (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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.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 3 binary64))) (/.f64 (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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (fma.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.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 3 binary64))))) (/.f64 (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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (fma.f64 angle (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.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 3 binary64))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #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))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.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))) (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)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (fma.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/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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/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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1/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/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (/.f64 (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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) (/.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 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) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.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 5 binary64))) (/.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 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) (fma.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.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 5 binary64))))) (/.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 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) (fma.f64 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal -1 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))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.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))) (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)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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/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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.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 5 binary64))))) (/.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #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 (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)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 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/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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 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/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 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 (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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 (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (fma.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #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)) (*.f64 (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 (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* 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 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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)) (*.f64 (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 (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* 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 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #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)) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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)) (*.f64 (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 (* (* x-scale x-scale) (* (* 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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (* x-scale x-scale) (* (* 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)) (*.f64 (pow.f64 x-scale #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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(approx (* (* x-scale x-scale) (* (* 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)) (*.f64 (pow.f64 x-scale #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)) (*.f64 (pow.f64 x-scale #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)) (*.f64 (pow.f64 x-scale #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 (* (* x-scale x-scale) (* (* 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)) (*.f64 (pow.f64 x-scale #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)) (*.f64 (pow.f64 x-scale #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)) (*.f64 (pow.f64 x-scale #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)) (*.f64 (pow.f64 x-scale #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 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (/.f64 (*.f64 y-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (*.f64 (PI.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)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 y-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (fma.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 angle (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))) (*.f64 y-scale (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y-scale (*.f64 (PI.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 y-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (fma.f64 angle (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y-scale (*.f64 (PI.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)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 angle (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (*.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/16200 binary64) (/.f64 (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (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))) (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.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))) (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 5 binary64))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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 #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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))) (*.f64 y-scale (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64))))))) (*.f64 y-scale (sqrt.f64 #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 y-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (*.f64 #s(literal 1/2 binary64) (/.f64 (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 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (fma.f64 #s(literal -1/180 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.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 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (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 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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 angle (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (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))) (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 4 binary64))))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.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 3 binary64))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.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/16200 binary64) (/.f64 (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (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))) (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.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))) (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 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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 #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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (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))) (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 4 binary64))))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.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 3 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (*.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (fma.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))) (*.f64 angle (fma.f64 #s(literal 1/45 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))) (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))) (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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (fma.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))) (*.f64 angle (fma.f64 #s(literal 1/45 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))) (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))) (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 (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 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))) (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 #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))))))))))))))))
#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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 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))) (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 #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 (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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (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))) (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 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 (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 x-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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (pow.f64 x-scale #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 x-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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 x-scale #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 y-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 x-scale #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 y-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 angle (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (* (* y-scale y-scale) (* (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 y-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (* y-scale y-scale) (* (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 y-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (* y-scale y-scale) (* (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 y-scale #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 y-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #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 (* (* y-scale y-scale) (* (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 y-scale #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 y-scale #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 y-scale #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 y-scale #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 (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.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))) (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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.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))) (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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 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))) (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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/2 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))) (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 #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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.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))) (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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 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))) (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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 angle (*.f64 y-scale (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 angle (fma.f64 angle (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 y-scale (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #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 -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (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))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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/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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #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/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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (*.f64 (pow.f64 a #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 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (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 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 (*.f64 #s(literal -2/45 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 #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))) (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 (pow.f64 a #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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 y-scale (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #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 -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (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))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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/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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #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/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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (*.f64 (pow.f64 a #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 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (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 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 (*.f64 #s(literal -2/45 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 #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))) (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 (pow.f64 a #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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 angle (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 angle (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 angle (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #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 -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (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))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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/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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #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/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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (*.f64 (pow.f64 a #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 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (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 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 (*.f64 #s(literal -2/45 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 #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))) (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 (pow.f64 a #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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 angle (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 (+.f64 (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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))))))))))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 angle (+.f64 (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (*.f64 (pow.f64 a #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 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (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 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 (*.f64 #s(literal -2/45 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 #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))) (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 (pow.f64 a #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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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)))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (pow.f64 y-scale #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 angle (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 angle (fma.f64 angle (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (*.f64 (pow.f64 a #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 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (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 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 (*.f64 #s(literal -2/45 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 #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))) (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 (pow.f64 a #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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (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 (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (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 (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (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 (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 angle (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (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 (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 angle (fma.f64 angle (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (*.f64 (pow.f64 a #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 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (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 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 (*.f64 #s(literal -2/45 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 #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))) (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 (pow.f64 a #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 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 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 (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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 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 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 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 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)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 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 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)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (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 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (*.f64 (pow.f64 a #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 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (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 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 (*.f64 #s(literal -2/45 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 #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))) (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 (pow.f64 a #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 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (*.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 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (fma.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))) (*.f64 angle (-.f64 (*.f64 #s(literal -2/45 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 #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))) (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))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (fma.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))) (*.f64 angle (-.f64 (fma.f64 #s(literal -2/45 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 (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (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 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)))))))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (fma.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))) (*.f64 angle (-.f64 (fma.f64 #s(literal -2/45 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 (-.f64 (fma.f64 angle (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (*.f64 (pow.f64 a #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 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (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 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 (*.f64 #s(literal -2/45 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 #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))) (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 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (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 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)))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale #s(literal 2 binary64)))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-scale #s(literal 2 binary64))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-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 x-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 x-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 x-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 x-scale #s(literal 2 binary64))))))))))
#s(approx (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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 x-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 x-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 x-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 x-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 x-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 x-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 x-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 x-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 x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (/.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 x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (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 x-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 x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (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 x-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 x-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 x-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 x-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 x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (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 x-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 x-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 x-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 x-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 x-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 x-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 x-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 x-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 (/ (+ (* (* a a) (* (sin (* 1/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)) (/.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 (/ (+ (* (* a a) (* (sin (* 1/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)) (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 (/ (+ (* (* a a) (* (sin (* 1/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)) (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/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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 (/ (+ (* (* a a) (* (sin (* 1/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)) (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/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 (/.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 (+ (* (* a a) (* (sin (* 1/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 (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-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 x-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))))) (* x-scale x-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 x-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 x-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 x-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 x-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))))) (* x-scale x-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 x-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 x-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 x-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 x-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 x-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 x-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))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-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 x-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))))) (* x-scale x-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 x-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 x-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 x-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 x-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))))) (* x-scale x-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 x-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 x-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 x-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 x-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 x-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 x-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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (fma.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (fma.f64 angle (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 angle (*.f64 b (*.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))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #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 -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (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))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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/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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))) (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (*.f64 #s(literal 1/2 binary64) (/.f64 (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))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (fma.f64 #s(literal -1/180 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (cos.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 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (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)))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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 angle (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (cos.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 3 binary64)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.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/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #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 -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (cos.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 3 binary64)))))))))
#s(approx (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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 (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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/16200 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 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 (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 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/16200 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 2 binary64) (/.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 #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 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* (* a a) (* (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 a #s(literal 2 binary64)) (*.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale)) (*.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 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 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)))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (/ (* (* a a) (* (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 (*.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 (*.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 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (/.f64 (*.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)))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.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))))))))))
#s(approx (* 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 (* 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 (* 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 #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))))))))
#s(approx (* 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 2 binary64) (/.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 #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 (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) x-scale))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) x-scale)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) x-scale)))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (-.f64 (*.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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) x-scale)))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (cos.f64 (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (sqrt.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)))))))
#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 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (sqrt.f64 (+.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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (+.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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (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 (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.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 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.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 y-scale #s(literal 2 binary64)) (pow.f64 (sin.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 (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.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))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (*.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)))) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))) (/ (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 (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 2 binary64) (*.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)))) (-.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 (* (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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)))) (-.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 (- (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (* (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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) (/.f64 #s(literal 1 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 (*.f64 #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)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.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)) (*.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 (pow.f64 x-scale #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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (fma.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)) (*.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))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (/.f64 (fma.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 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)) (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)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.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 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 y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.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 (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.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))) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.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))) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.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))) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.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))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.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)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/2 binary64) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.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))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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))))))) (/ (+ (* (* a a) (* (sin (* 1/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))) (/.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 x-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)))))) (* 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-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))))) (* x-scale x-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 x-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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))) (sqrt.f64 (/.f64 #s(literal 1 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)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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))))))) (sqrt.f64 (/.f64 #s(literal 1 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)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.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))))) #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))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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))))))) (sqrt.f64 (/.f64 #s(literal 1 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)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.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))))) #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)))))))))) (sqrt.f64 (/.f64 #s(literal 1 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)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (+.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 (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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 #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 #s(literal 1/4 binary64) (/.f64 (pow.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))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.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))))) #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))))))))) (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))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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)))))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #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 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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #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 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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #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 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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)))) (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #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 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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #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 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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #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 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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)))) (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* x-scale (* y-scale (pow 8 1/2))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
#s(approx x-scale x-scale)
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #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 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)))) (sqrt.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)))) (sqrt.f64 #s(literal 2 binary64)))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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 #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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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)))) (sqrt.f64 #s(literal 2 binary64)))))))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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 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 (fma.f64 #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 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)))) (sqrt.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 #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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)))) (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))) x-scale))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (*.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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #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 (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 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 (fma.f64 #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 y-scale #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.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 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 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 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 (fma.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 y-scale #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 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 (fma.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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (fma.f64 #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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 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 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 (fma.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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (fma.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (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 (fma.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 (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 4 binary64))) (pow.f64 x-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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (* x-scale x-scale)) (/ (* (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 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))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (+.f64 (/.f64 (*.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))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.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))))
#s(approx (pow (* x-scale y-scale) 2) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* x-scale y-scale) (*.f64 x-scale y-scale))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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/16 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 8 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (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 4 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 y-scale #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/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (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 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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 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/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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/16 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 8 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (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 4 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 y-scale #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/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (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 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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 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/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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/16 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 8 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (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 4 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 y-scale #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/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (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 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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)))) x-scale))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 binary64))))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)))))) x-scale))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (pow.f64 a #s(literal 2 binary64))) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (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 4 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 y-scale #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/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (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 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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (pow.f64 a #s(literal 2 binary64))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)))))) x-scale))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) x-scale)))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) x-scale))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 binary64))))))))) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))))) x-scale))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (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 4 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 y-scale #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/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (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 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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))))))))) x-scale))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 binary64))))))))) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (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 4 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 y-scale #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/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (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 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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (/.f64 (fma.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 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (/.f64 (fma.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 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 binary64)))))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (/.f64 (fma.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 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (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 4 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 y-scale #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/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (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 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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (*.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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (/.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) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (/.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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (/.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) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (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 4 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 y-scale #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/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (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 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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (*.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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (/.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 -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (/.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 -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 binary64)))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (/.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 -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/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 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (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 4 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 y-scale #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/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (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 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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))))))))))))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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 x-scale #s(literal 4 binary64)))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 4 binary64))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 #s(literal 2 binary64) (/.f64 (*.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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/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)))))))) (pow.f64 x-scale #s(literal 4 binary64))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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 x-scale #s(literal 4 binary64)))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (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 x-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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 4 binary64))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (+.f64 (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 #s(literal 2 binary64) (/.f64 (*.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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/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))))))) (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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (+.f64 (*.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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (/.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))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/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 2 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (*.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 (pow.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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (*.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 (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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)) (fma.f64 #s(literal -1/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 2 binary64)) (+.f64 (*.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (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 4 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 y-scale #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/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))))))) (*.f64 #s(literal -1/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 -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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) (/.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 4 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) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 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) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 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) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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 4 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 y-scale #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 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (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 (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 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 (*.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)))) (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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.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)))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (*.f64 x-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (*.f64 x-scale (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal -1/8 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (*.f64 x-scale (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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/16 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 8 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))) (sqrt.f64 #s(literal 1/2 binary64))))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (*.f64 #s(literal 1/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)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (*.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)) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 #s(literal 1/8 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 6 binary64))))))) (*.f64 #s(literal 1/4 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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/16 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 10 binary64))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 8 binary64)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 #s(literal 1/8 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 6 binary64))))))) (*.f64 #s(literal 1/4 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (fma.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))))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (/.f64 (+.f64 (/.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 (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.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 y-scale) (* x-scale x-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 #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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 #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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))) x-scale))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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))))))) y-scale) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.f64 (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 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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))) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.f64 (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 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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))))))))))
#s(approx (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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))) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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 (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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))))))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))))
#s(approx (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/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/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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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))))))
#s(approx (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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))) (/.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-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 x-scale #s(literal 2 binary64))))
#s(approx (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (*.f64 x-scale (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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 (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) (/.f64 (pow.f64 x-scale #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 (sin.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)))))) (* x-scale x-scale))) (* 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 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))))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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))))))))
#s(approx (* x-scale (pow 8 1/2)) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (sqrt.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))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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/4 binary64) (/.f64 (pow.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))))) #s(literal 2 binary64)) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (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 #s(literal 1/2 binary64) (/.f64 (*.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))))) (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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/4 binary64) (/.f64 (pow.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))))) #s(literal 2 binary64)) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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/4 binary64) (/.f64 (pow.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))))) #s(literal 2 binary64)) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (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 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (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 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (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 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.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 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (*.f64 #s(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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (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 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (*.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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 (pow.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (fma.f64 #s(literal 1/180 binary64) (*.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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 (pow.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.f64 #s(literal 1/180 binary64) (*.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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (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))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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 x-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 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.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))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (*.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (-.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 (fma.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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (-.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 (fma.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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.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 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 x-scale (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #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 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 x-scale (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 4 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 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #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 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 x-scale (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (-.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 (fma.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 (pow.f64 x-scale #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 6 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 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 4 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 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #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 (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (*.f64 x-scale (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 2 binary64)))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 2 binary64))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 2 binary64)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) y-scale)))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 x-scale (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)) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (*.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)) (sqrt.f64 #s(literal 8 binary64)))) y-scale)))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (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)) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (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)) (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (*.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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (pow.f64 x-scale #s(literal 2 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 y-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)) (pow.f64 (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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)) (pow.f64 (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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (*.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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (fma.f64 #s(literal -1 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 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)))) (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 y-scale #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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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)))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (fma.f64 #s(literal -1 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 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)))) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 2 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (pow.f64 x-scale #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 y-scale #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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))))))))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (fma.f64 #s(literal -1 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 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)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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 -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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 6 binary64)))) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 6 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (pow.f64 x-scale #s(literal 6 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 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 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 y-scale #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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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)))))))))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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)))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #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 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 2 binary64)))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #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 x-scale #s(literal 4 binary64)))) (+.f64 (*.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 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 2 binary64))))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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)))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 2 binary64))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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 x-scale #s(literal 4 binary64)))) (+.f64 (*.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 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/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))))
#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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (*.f64 (pow.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 x-scale #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 (fma.f64 #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 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 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 binary64) (/.f64 (*.f64 (pow.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 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #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 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (/.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))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 6 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)))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 6 binary64)))) (fma.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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 6 binary64)))) (fma.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 #s(literal -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)))) (fma.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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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)))))))
#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) (/.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 4 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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 8 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 4 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) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))) (pow.f64 x-scale #s(literal 4 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 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 8 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) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))))) (pow.f64 x-scale #s(literal 6 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 8 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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 4 binary64)) (pow.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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.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)))))
#s(approx (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (pow.f64 x-scale #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 (*.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))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (/.f64 (*.f64 y-scale (sqrt.f64 #s(literal 1/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 (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #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 (fma.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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 y-scale (sqrt.f64 #s(literal 1/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 (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #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 (fma.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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 y-scale (sqrt.f64 #s(literal 1/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 (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (fma.f64 #s(literal -1/2 binary64) (/.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/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (-.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #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 (fma.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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 y-scale (sqrt.f64 #s(literal 1/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 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (*.f64 #s(literal 1/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)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 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)))) (*.f64 #s(literal 1/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))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/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 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 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)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (-.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)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (-.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 10 binary64)))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal 1/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/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 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)))))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (*.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) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 2 binary64) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (fma.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 (pow.f64 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (fma.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 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.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))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.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)))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (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 (pow.f64 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (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 (pow.f64 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (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 (pow.f64 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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))))))) y-scale) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) y-scale) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.f64 (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 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (sqrt.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)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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))) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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))) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.f64 (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 (sqrt.f64 #s(literal 8 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (sqrt.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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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/4 binary64) (/.f64 (pow.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))))) #s(literal 2 binary64)) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (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 #s(literal 1/2 binary64) (/.f64 (*.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))))) (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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/4 binary64) (/.f64 (pow.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))))) #s(literal 2 binary64)) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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/4 binary64) (/.f64 (pow.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))))) #s(literal 2 binary64)) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (-.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 (fma.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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.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 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (-.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 (fma.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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.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 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (-.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 (fma.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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.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 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 2 binary64)))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 4 binary64))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) y-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 4 binary64)))))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (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)) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (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)) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (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)) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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) (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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))))))) y-scale) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (sqrt.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 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) y-scale) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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))) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (sqrt.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 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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))) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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))) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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 (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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)))))))))
#s(approx (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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)))))))))
#s(approx (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (sqrt.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)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 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 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 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/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 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/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (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(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 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/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 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/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (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(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 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/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (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 (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 (*.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)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (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(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.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 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.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 (* y-scale (pow 8 1/2)) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
#s(approx y-scale y-scale)
#s(approx (* y-scale 4) (*.f64 #s(literal 4 binary64) y-scale))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 #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 x-scale #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 #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 x-scale #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 #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 x-scale #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))))) (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 (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 #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 x-scale #s(literal 2 binary64)))) (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 #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 x-scale #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 #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 x-scale #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 #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 x-scale #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))))) (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 (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 #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 x-scale #s(literal 2 binary64)))) (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (*.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 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 #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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))) (sqrt.f64 #s(literal 2 binary64)))))))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 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 #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 x-scale #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 #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 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))))) (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 (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 #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 x-scale #s(literal 2 binary64)))) (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))) y-scale))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.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 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 (*.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 x-scale #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.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 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 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))))) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.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 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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))))))) (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 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 (*.f64 #s(literal 1/180 binary64) (*.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 x-scale #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))))) (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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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))))))) (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 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 (*.f64 #s(literal 1/180 binary64) (*.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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (fma.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 (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 (* y-scale y-scale) (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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (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 (*.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))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (fma.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 (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))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (/.f64 (-.f64 (/.f64 (*.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))) (pow.f64 (sin.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (+.f64 (/.f64 (*.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))) (pow.f64 (sin.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))) (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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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/8 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 6 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))) (fma.f64 #s(literal -1/16 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.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)))) (-.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/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.f64 (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 -1 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))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.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)) (*.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 6 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 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 6 binary64)))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (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 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))) (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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))) (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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))) (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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))))) (*.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))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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/8 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 6 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))) (fma.f64 #s(literal -1/16 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.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)))) (-.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/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.f64 (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 -1 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))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.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)) (*.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 6 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 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 6 binary64)))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (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 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))) (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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))))) (*.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 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))) (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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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/8 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 6 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))) (fma.f64 #s(literal -1/16 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.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)))) (-.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/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.f64 (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 -1 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))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.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)) (*.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 6 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 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 6 binary64)))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (*.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 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (pow.f64 a #s(literal 2 binary64)))) y-scale))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))))) (pow.f64 a #s(literal 2 binary64))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))) (pow.f64 a #s(literal 2 binary64)))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (pow.f64 a #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64)))))))) (pow.f64 a #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.f64 (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 -1 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))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.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)) (*.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 6 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 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 6 binary64)))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (pow.f64 a #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))) (pow.f64 a #s(literal 2 binary64)))))) y-scale))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))))) y-scale))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))))) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))))) y-scale))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.f64 (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 -1 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))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.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)) (*.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 6 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 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 6 binary64)))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))))))))) y-scale))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (/.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) y-scale))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (/.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64)))))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))))) y-scale))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (/.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.f64 (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 -1 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))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.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)) (*.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 6 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 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 6 binary64)))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))))))))))))) y-scale))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (/.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (/.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64)))))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (/.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.f64 (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 -1 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))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.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)) (*.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 6 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 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 6 binary64)))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (/.f64 (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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (/.f64 (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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (/.f64 (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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.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/2 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.f64 (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 -1 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))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.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)) (*.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 6 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 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 6 binary64)))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64)))))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (/.f64 (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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (/.f64 (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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64)))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (/.f64 (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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 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 x-scale #s(literal 4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.f64 (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 -1 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))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.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)) (*.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 6 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 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 6 binary64)))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))))))))))))))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))) (*.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 x-scale #s(literal 4 binary64)))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (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 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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))) (*.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 binary64) (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (*.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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64)))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/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 -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/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)) (+.f64 (*.f64 #s(literal -1 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))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.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)) (*.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 6 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 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 6 binary64)))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.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 -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (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)) (*.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 6 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 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 6 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 8 binary64))))))) (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)) (*.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 6 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 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 6 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)))))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 8 binary64))))))) (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)) (*.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 6 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 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 6 binary64))))))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 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 (*.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)))) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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))))) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (sqrt.f64 #s(literal 1/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 (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (*.f64 y-scale (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 (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/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal -1/8 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)))) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (sqrt.f64 #s(literal 1/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 (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (*.f64 y-scale (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 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)))) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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/8 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 6 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))) (fma.f64 #s(literal -1/16 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.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)))) (-.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/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))) (sqrt.f64 #s(literal 1/2 binary64))))))) (/.f64 (sqrt.f64 #s(literal 1/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 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (*.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)) (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 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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/8 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 6 binary64))))))) (*.f64 #s(literal 1/4 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)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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/8 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 6 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))) (fma.f64 #s(literal -1/16 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 10 binary64))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.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)))) (-.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 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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/8 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 6 binary64))))))) (*.f64 #s(literal 1/4 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)))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #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/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #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/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #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/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 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (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 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (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 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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)))) (sqrt.f64 #s(literal 2 binary64)))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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 #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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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 #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 (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 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))) y-scale))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.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))))))) y-scale) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.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))))))) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) y-scale))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.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))) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.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))))))) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))) (sqrt.f64 (/.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)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))) (sqrt.f64 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/4 binary64) (/.f64 (pow.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 (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))))) (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 #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)))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.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)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))) (sqrt.f64 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (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)))))) (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 #s(literal 1/2 binary64) (/.f64 (*.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 (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))))) (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 #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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/4 binary64) (/.f64 (pow.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 (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))))) (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 #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))))))))) (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)))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/4 binary64) (/.f64 (pow.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 (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))))) (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 #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)))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.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)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 2 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.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 x-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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 2 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.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 x-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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (*.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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 2 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.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 x-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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (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 (pow.f64 (sin.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (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)))) (fma.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 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (pow.f64 (sin.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (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)))) (fma.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 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 #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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (pow.f64 (sin.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (pow.f64 (sin.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-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))) (fma.f64 #s(literal -1 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.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))) (pow.f64 (sin.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (*.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 y-scale (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #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)))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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 y-scale #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #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))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 y-scale #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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 y-scale #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #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))))))))))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #s(literal 1/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))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #s(literal 1/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))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (*.f64 y-scale (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #s(literal 1/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))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #s(literal 1/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))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #s(literal 1/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))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #s(literal 1/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))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.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)) (*.f64 (pow.f64 (sin.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (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 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.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)) (*.f64 (pow.f64 (sin.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (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 -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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #s(literal 1/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))) (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 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 (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.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)) (*.f64 (pow.f64 (sin.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (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 -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #s(literal 1/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))) (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 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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 4 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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 4 binary64)))) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 4 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 b #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)))) (pow.f64 y-scale #s(literal 4 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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 y-scale #s(literal 6 binary64)))) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 6 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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)) (pow.f64 y-scale #s(literal 6 binary64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (pow.f64 y-scale #s(literal 4 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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #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 x-scale #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #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 x-scale #s(literal 4 binary64)))) (+.f64 (*.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 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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 x-scale #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 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 x-scale #s(literal 4 binary64)))) (+.f64 (*.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 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (/ (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (*.f64 (pow.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 x-scale #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 (fma.f64 #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 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 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 (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 6 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)))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 6 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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)) (pow.f64 y-scale #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 2 binary64))))))
#s(approx (pow (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 6 binary64)))) (fma.f64 #s(literal -1/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 -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 6 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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)) (pow.f64 y-scale #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 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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 8 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 4 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) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))) (pow.f64 y-scale #s(literal 4 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 4 binary64)))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 8 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) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))))) (pow.f64 y-scale #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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 12 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 8 binary64)))) (/.f64 (*.f64 (pow.f64 x-scale #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 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 8 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 (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (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 (*.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))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 3 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 3 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 3 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (sqrt.f64 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/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))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 1/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 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 10 binary64)))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.f64 #s(literal 1/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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 y-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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 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))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (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)))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (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))))))))
#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 (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.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)))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))) (sqrt.f64 (/.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)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))) (sqrt.f64 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/4 binary64) (/.f64 (pow.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 (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))))) (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 #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)))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.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)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))) (sqrt.f64 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (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)))))) (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 #s(literal 1/2 binary64) (/.f64 (*.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 (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))))) (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 #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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/4 binary64) (/.f64 (pow.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 (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))))) (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 #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))))))))) (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)))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/4 binary64) (/.f64 (pow.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 (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))))) (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 #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)))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.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)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 2 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.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 x-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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 2 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.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 x-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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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))))))))))
#s(approx (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 6 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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)))))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #s(literal 1/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)))))))))
#s(approx (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #s(literal 1/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))))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #s(literal 1/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)))))))))
#s(approx (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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 x-scale #s(literal 2 binary64))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #s(literal 1/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))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.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))) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))))

eval3.2s (3.5%)

Memory
61.0MiB live, 4 603.5MiB allocated; 1.5s collecting garbage
Compiler

Compiled 3 967 549 to 37 516 computations (99.1% saved)

prune12.0s (13.3%)

Memory
162.6MiB live, 21 169.3MiB allocated; 2.8s collecting garbage
Pruning

34 alts after pruning (33 fresh and 1 done)

PrunedKeptTotal
New4 870294 899
Fresh347
Picked415
Done000
Total4 877344 911
Accuracy
73.6%
Counts
4 911 → 34
Alt Table
Click to see full alt table
StatusAccuracyProgram
2.0%
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (/.f64 (fma.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)) (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 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
6.5%
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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(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))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
3.1%
(/.f64 (neg.f64 #s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
4.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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 (+ (* (* a a) (* (sin (+ (* 1/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))))))) (*.f64 y-scale y-scale)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
3.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) #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)))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 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(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
▶45.2%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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)))))))))))
2.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
4.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 #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)))) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
▶5.3%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
22.8%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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)))))))))))
17.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
23.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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)))))))))))
45.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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 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)))))
43.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))))
42.4%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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) #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(literal 1/2 binary64)))))
32.4%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
▶37.5%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
9.8%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
9.2%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
45.2%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)))))))))
41.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))))
41.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))
21.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
11.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.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 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
▶6.8%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
20.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-scale #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
19.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 1/2 binary64)))))
35.3%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))))
35.3%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
✓35.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
16.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
9.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
15.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
▶8.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
Compiler

Compiled 30 435 to 7 548 computations (75.2% saved)

series2.3s (2.6%)

Memory
-253.5MiB live, 2 717.4MiB allocated; 1.2s collecting garbage
Counts
179 → 1 204
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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))))))))))
y-scale
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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))))))))
#s(literal 1/4 binary64)
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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)))))))
(sqrt.f64 #s(literal 8 binary64))
#s(literal 8 binary64)
(sqrt.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))))))
(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(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
(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/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 2 binary64))
b
(pow.f64 (sin.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)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
(*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
(*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
(*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
x-scale
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))
(*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))
(*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))
(pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))
(pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 4 binary64)
(*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))
(/.f64 #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)))) (*.f64 x-scale x-scale))
#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))))
(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)))
(+.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)))))))
(*.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))))))
#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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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))))))
(fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -1/32400 binary64)
(*.f64 (pow.f64 (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))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))
(*.f64 #s(literal 1/32400 binary64) (*.f64 (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 1/32400 binary64)
(*.f64 (pow.f64 (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))
(*.f64 x-scale x-scale)
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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 (*.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))))))
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(*.f64 x-scale y-scale)
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
(*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
(+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
(*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(literal 1/8 binary64)
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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))))))))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
(*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))
(sqrt.f64 #s(literal 1/2 binary64))
(*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 y-scale #s(literal 2 binary64))
(+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(literal -1/4 binary64)
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sqrt.f64 #s(literal 8 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)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 x-scale #s(literal 2 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 x-scale #s(literal 2 binary64)))
(*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))
(pow.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(literal 3 binary64)
(/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))
(fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.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 -8 binary64)
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.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 -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)) (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)) (*.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 6 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 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 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 4 binary64)) (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)) (*.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 6 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 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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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(literal 6 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 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 6 binary64)))))
(*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
(/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))
(/.f64 (*.f64 (pow.f64 b #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 2 binary64)))
(*.f64 (pow.f64 b #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 4 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))
(*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))
(pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))
(+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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))
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))
(fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* (pow a 2) (* y-scale (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* (pow a 2) (+ (* y-scale (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))) (* (pow a 2) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 3) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 3) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (+ (* 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(hole binary64 (* 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))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/4 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) a)))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (pow a 2))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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)))) 3) (sqrt 1/2)))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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)))) 3) (sqrt 1/2)))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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)))) 3) (sqrt 1/2)))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow a 2))))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) #s(hole binary64 (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) #s(hole binary64 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))
#s(approx (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) #s(hole binary64 (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (pow a 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))) (pow a 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))
#s(approx (sqrt (+ (* 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(hole binary64 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 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(hole binary64 (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 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(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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (* (pow a 2) (+ (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (pow a 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (pow a 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))) (pow a 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* (pow b 2) (* y-scale (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* (pow b 2) (+ (* y-scale (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))) (* (pow b 2) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 3) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 3) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (pow b 2) #s(hole binary64 (pow b 2)))
#s(approx b #s(hole binary64 b))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* b (* x-scale (* y-scale (pow 8 1/2)))) #s(hole binary64 (* b (* x-scale (* y-scale (sqrt 8))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/4 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (/ (+ (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) b)))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) #s(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (* (pow b 2) (+ (* 2 (/ (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) #s(hole binary64 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (* (pow b 2) (+ (* -1/4 (/ (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (/ (* (pow b 2) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) #s(hole binary64 (* (pow b 2) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (pow b 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow b 2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))
#s(approx (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))
#s(approx (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) #s(hole binary64 (* (pow b 2) (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) #s(hole binary64 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) #s(hole binary64 (* 2 (/ (* (pow b 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) #s(hole binary64 (/ (* (pow b 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-scale 2)))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))
#s(approx (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) #s(hole binary64 (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (pow b 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))) (pow b 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 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(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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* b (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow b 2) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (/ (* a (* x-scale (* y-scale (sqrt 8)))) (pow b 2)) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow b 2) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (/ (* x-scale (* y-scale (sqrt 8))) (pow b 2)) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (pow b 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))) (pow b 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (* -1 (* b (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (+ (* angle (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/360 (/ (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (/ (* angle (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/8 (/ (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/90 (/ (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/2 (/ (* angle (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* 1/90 (/ (* angle (* b (* (PI) (cos (* 1/2 (PI)))))) (sqrt 2))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (sqrt 2))) (* 1/2 (/ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (+ (* 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(hole binary64 (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* 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(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 (* (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(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 (* (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(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 (* (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 (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 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (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 (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/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/8 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/2 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* 1/180 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* b (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))))) (* 1/180 (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* angle (+ (* 1/180 (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/34992000 (* b (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* 1/22674816000000 (* (pow angle 2) (* b (* x-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))))))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* angle (+ (* 1/180 (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/34992000 (* b (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* b (* x-scale (* (pow (PI) 7) (* (sqrt 2) (sqrt 8))))))) (* 1/22674816000000 (* b (* x-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8))))))))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) #s(hole binary64 (* 1/180 (* angle (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* 1/180 (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/34992000 (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))) (* 1/22674816000000 (* (pow angle 2) (* x-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8))))))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/34992000 (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* x-scale (* (pow (PI) 7) (* (sqrt 2) (sqrt 8)))))) (* 1/22674816000000 (* x-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) #s(hole binary64 (* 1/180 (* angle (* (PI) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))) (* 1/180 (* (PI) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))) (* 1/22674816000000 (* (pow angle 2) (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* (pow (PI) 7) (* (sqrt 2) (sqrt 8))))) (* 1/22674816000000 (* (pow (PI) 5) (* (sqrt 2) (sqrt 8))))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (cos (* 1/2 (PI))))) (* x-scale (sqrt 2)))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* x-scale (sqrt 2)))) (* 1/2 (/ (* angle (* x-scale (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* x-scale (sqrt 2)))) (* angle (+ (* 1/2 (/ (* angle (* x-scale (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* x-scale (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 2 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/2 (/ (* angle (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* 1/2 (/ (* angle (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (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 (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2)))))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (/ (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 (+ (* 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(hole binary64 (pow (sin (* 1/2 (PI))) 2)))
#s(approx (+ (* 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(hole binary64 (+ (* 1/90 (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (+ (* 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(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 (+ (* 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)))))) #s(hole binary64 (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* 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)))))) #s(hole binary64 (+ (* 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))))))))
#s(approx (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) #s(hole binary64 (* angle (+ (* -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)))) (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))))) #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2)))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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 (/ (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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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))))))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 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))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* 1/90 (* angle (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (* (pow y-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) (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (+ (* angle (* (pow y-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 y-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) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow x-scale 2) (pow (PI) 2))))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow x-scale 2) (pow (PI) 4)))) (* 1/32400 (* (pow x-scale 2) (pow (PI) 2)))))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow x-scale 2) (pow (PI) 4))) (* (pow angle 2) (* (pow x-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow x-scale 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow x-scale 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow x-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/8 (/ (* angle (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* y-scale (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/2 (/ (* angle (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* y-scale (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* (PI) (cos (* 1/2 (PI)))))) (sqrt 2))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (sqrt 2))) (* 1/2 (/ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (+ (* 1/180 (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (+ (* angle (+ (* 1/180 (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2))))) (* angle (+ (* -1/64800 (* b (* (pow (PI) 2) (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (+ (* angle (+ (* 1/180 (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2))))) (* angle (+ (* -1/64800 (* b (* (pow (PI) 2) (* (sin (* 1/2 (PI))) (sqrt 2))))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* angle (- (* -1/34992000 (* b (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sqrt 2))))) (* 1/5832000 (/ (* (pow a 2) (* (pow (PI) 3) (cos (* 1/2 (PI))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 2)))))))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) #s(hole binary64 (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) #s(hole binary64 (+ (* 1/180 (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) #s(hole binary64 (+ (* angle (+ (* -1/64800 (* angle (* b (* (pow (PI) 2) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (* 1/180 (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) #s(hole binary64 (+ (* angle (+ (* 1/180 (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2))))) (* angle (+ (* -1/64800 (* b (* (pow (PI) 2) (* (sin (* 1/2 (PI))) (sqrt 2))))) (* -1/34992000 (* angle (* b (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sqrt 2)))))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) #s(hole binary64 (* (sin (* 1/2 (PI))) (sqrt 2))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) #s(hole binary64 (+ (* 1/180 (* angle (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) #s(hole binary64 (+ (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2)))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) #s(hole binary64 (+ (* angle (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2)))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* -1/34992000 (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sqrt 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) #s(hole binary64 (* 1/32400 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 2))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/5832000 (/ (* (pow a 2) (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 2))))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* angle (- (* angle (- (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (+ (* -1/1049760000 (/ (* (pow a 2) (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (* b (* (pow (sin (* 1/2 (PI))) 3) (sqrt 2))))) (* -1/2099520000 (/ (* (pow a 2) (pow (PI) 4)) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* 1/5832000 (/ (* (pow a 2) (* (pow (PI) 3) (cos (* 1/2 (PI))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 2)))))))))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* angle (- (* angle (- (+ (* -1 (* angle (+ (* -1/1133740800000 (/ (* (pow a 2) (* (pow (PI) 5) (cos (* 1/2 (PI))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 2))))) (+ (* 1/377913600000 (/ (* (pow a 2) (* (pow (PI) 5) (cos (* 1/2 (PI))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 2))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (+ (* -1/1049760000 (/ (* (pow a 2) (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (* b (* (pow (sin (* 1/2 (PI))) 3) (sqrt 2))))) (* -1/2099520000 (/ (* (pow a 2) (pow (PI) 4)) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (sin (* 1/2 (PI))))))))) (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))) (+ (* -1/1049760000 (/ (* (pow a 2) (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (* b (* (pow (sin (* 1/2 (PI))) 3) (sqrt 2))))) (* -1/2099520000 (/ (* (pow a 2) (pow (PI) 4)) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* 1/5832000 (/ (* (pow a 2) (* (pow (PI) 3) (cos (* 1/2 (PI))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))))) (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))) (* angle (+ (* a (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* a (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))) (* angle (+ (* a (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))) (* angle (+ (* a (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (+ (* angle (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (+ (* angle (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (+ (* angle (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (+ (* angle (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* 1/16200 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI)))))))))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* 1/16200 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* angle (+ (* -1/2916000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (* (pow (PI) 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/34992000 (/ (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))))))))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI))))))))))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/5832000 (/ (* angle (* (pow b 2) (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (sqrt 8))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI))))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* angle (- (* angle (- (* -1/3149280000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* -1/1049760000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (pow (cos (* 1/2 (PI))) 2) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 3)))) (* -1/2099520000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI))))))))) (* 1/5832000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* angle (- (* angle (- (+ (* -1 (* angle (+ (* -1/1133740800000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/377913600000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/3149280000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* -1/1049760000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (pow (cos (* 1/2 (PI))) 2) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 3)))) (* -1/2099520000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (* -1/3149280000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (+ (* -1/1049760000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (pow (cos (* 1/2 (PI))) 2) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 3)))) (* -1/2099520000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI))))))))) (* 1/5832000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))))) (* 1/32400 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8)))))) (* (pow angle 2) (* (pow b 2) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8)))))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))) (* (pow b 2) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8)))))) (* 1/32400 (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/3149280000 (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow angle 2) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/3149280000 (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow angle 2) (+ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow angle 2) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* 1/32400 (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8)))) (* (pow angle 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8)))) (* (pow angle 2) (+ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* (pow angle 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))))))))))))
#s(approx (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* (pow a 2) (sin (* 1/2 (PI))))))
#s(approx (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (+ (* 1/180 (* (pow a 2) (* angle (* (PI) (cos (* 1/2 (PI))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (+ (* angle (+ (* -1/64800 (* (pow a 2) (* angle (* (pow (PI) 2) (sin (* 1/2 (PI))))))) (* 1/180 (* (pow a 2) (* (PI) (cos (* 1/2 (PI)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (+ (* angle (+ (* 1/180 (* (pow a 2) (* (PI) (cos (* 1/2 (PI)))))) (* angle (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* -1/34992000 (* (pow a 2) (* angle (* (pow (PI) 3) (cos (* 1/2 (PI))))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (+ (* angle (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (+ (* angle (+ (* angle (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI))))))))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (* (pow (PI) 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/34992000 (/ (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI)))))))))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI)))))))))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (+ (* angle (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (+ (* angle (- (+ (* angle (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (+ (* angle (- (+ (* angle (- (+ (* angle (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (* (pow (PI) 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/34992000 (/ (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) #s(hole binary64 (* -1/129600 (/ (* (pow angle 4) (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))))))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) #s(hole binary64 (* (pow angle 4) (+ (* -1/4 (* angle (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2)))))))) (* -1/129600 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))))))))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) #s(hole binary64 (* (pow angle 4) (+ (* -1/129600 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* angle (+ (* -1/4 (* angle (- (/ (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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)))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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 (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3)))))) (* -1/4 (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2)))))))))))))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) #s(hole binary64 (* (pow angle 4) (+ (* -1/129600 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* angle (+ (* -1/4 (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (* angle (+ (* -1/4 (* angle (- (/ (* (pow b 2) (* x-scale (+ (* -1/6298560000 (* (pow (PI) 4) (* (sqrt 8) (- (+ (* -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/64800 (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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))))))))))) (+ (* 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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (+ (/ (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3)) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (/ (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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)))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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 (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 3))))))) (* -1/4 (- (/ (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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)))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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 (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3)))))))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 4) (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* angle (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2)))))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* angle (- (+ (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* angle (- (/ (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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)))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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 (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2)))))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* angle (- (+ (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* angle (- (+ (* angle (- (/ (* (pow b 2) (* x-scale (+ (* -1/6298560000 (* (pow (PI) 4) (* (sqrt 8) (- (+ (* -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/64800 (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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))))))))))) (+ (* 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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (+ (/ (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3)) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (/ (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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)))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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 (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 3)))))) (/ (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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)))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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 (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2)))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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/32400 (* (pow angle 4) (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/64800 (* angle (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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/32400 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/32400 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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/64800 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/32400 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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/64800 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 (+ (* angle (* (pow b 2) (* x-scale (+ (* -1/6298560000 (* (pow (PI) 4) (* (sqrt 8) (- (+ (* -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/64800 (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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)))))))))))) (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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 (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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/32400 (* (pow angle 4) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/64800 (* angle (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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/32400 (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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/64800 (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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 (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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/64800 (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 (+ (* angle (* x-scale (+ (* -1/6298560000 (* (pow (PI) 4) (* (sqrt 8) (- (+ (* -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/64800 (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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))))))))))) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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/32400 (* (pow angle 4) (* (pow (PI) 2) (* (sqrt 8) (+ (* 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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/64800 (* angle (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* 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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* 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/64800 (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* 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/64800 (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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))))))))) (* angle (+ (* -1/6298560000 (* (pow (PI) 4) (* (sqrt 8) (- (+ (* -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/64800 (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 (* (sqrt 8) (+ (* 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) (* (sqrt 8) (+ (* 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 (* (sqrt 8) (+ (* 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/2 (* angle (* (sqrt 8) (- (+ (* -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))))))) (* (sqrt 8) (+ (* 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 (* (sqrt 8) (+ (* 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) (+ (* angle (+ (* 1/2 (* (sqrt 8) (- (+ (* -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 (* (sqrt 8) (+ (* -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)))))))))) (* (sqrt 8) (+ (* 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 (* (sqrt 8) (+ (* 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) (+ (* angle (+ (* 1/2 (* (sqrt 8) (- (+ (* -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/2 (* angle (* (sqrt 8) (- (+ (* -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)))))))) (* (sqrt 8) (+ (* -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))))))))))) (* (sqrt 8) (+ (* 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 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (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 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (* 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)))) 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 (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) #s(hole binary64 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))))
#s(approx (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) #s(hole binary64 (+ (* (pow a 2) (* angle (* (sqrt 1/2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))))
#s(approx (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) #s(hole binary64 (+ (* angle (+ (* (pow a 2) (* angle (* (sqrt 1/2) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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) (* (sqrt 1/2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))))
#s(approx (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* (pow a 2) (* angle (* (sqrt 1/2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 a 2) (* (sqrt 1/2) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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) (* (sqrt 1/2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) #s(hole binary64 (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) #s(hole binary64 (+ (* angle (* (sqrt 1/2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) #s(hole binary64 (+ (* angle (+ (* angle (* (sqrt 1/2) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* (sqrt 1/2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* (sqrt 1/2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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))))))))))))) (* (sqrt 1/2) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* (sqrt 1/2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) #s(hole binary64 (pow (sin (* 1/2 (PI))) 3)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) #s(hole binary64 (+ (* angle (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (pow (sin (* 1/2 (PI))) 3))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) #s(hole binary64 (+ (* angle (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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))) 3))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) #s(hole binary64 (+ (* angle (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (+ (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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)))))))))))) (* (sin (* 1/2 (PI))) (+ (* -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))) 3))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (+ (* angle (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (+ (* angle (- (+ (* angle (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (+ (* angle (- (+ (* angle (- (+ (* angle (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (* (pow (PI) 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/34992000 (/ (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) #s(hole binary64 (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) #s(hole binary64 (+ (* angle (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) #s(hole binary64 (+ (* angle (+ (* angle (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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))))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (+ (* angle (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (+ (* angle (+ (* angle (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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))))))) (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (+ (* angle (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (+ (* angle (+ (* angle (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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))))) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* (sqrt 8) (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (+ (* -1 (/ (* (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))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (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 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (+ (* -1 (/ (* (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))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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/90 (/ (* (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 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (+ (* -1 (/ (* (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))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))))) (+ (* angle (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 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/90 (/ (* (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) #s(hole binary64 (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 2 (* angle (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))
#s(approx (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 2 (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* angle (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))))))))))
#s(approx (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 2 (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* angle (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 2 (* angle (- (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))))))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 2))) (pow x-scale 2)))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 4))) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2)))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (pow x-scale 2))))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))))))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (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 2) (pow (sin (* 1/180 (* angle (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 2) (pow (sin (* 1/180 (* angle (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 (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) #s(hole binary64 (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 2 (* angle (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 2 (* angle (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (* 2 (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 2 (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* angle (+ (* 2 (* angle (- (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))))))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) #s(hole binary64 (* 1/32400 (* (pow angle 4) (* (pow b 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (* angle (* (pow b 2) (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))))) (* 1/32400 (* (pow b 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (* (pow b 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* angle (+ (* 1/32400 (* (pow b 2) (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))))))))) (* angle (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))) (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 (sin (* 1/2 (PI))) 4) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))))))))))))))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (* (pow b 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* angle (+ (* 1/32400 (* (pow b 2) (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))))))))) (* angle (+ (* angle (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))) (+ (* (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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)))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 (sin (* 1/2 (PI))) 4) (+ (* -4 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 2 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3)))))))))))))))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))) (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 (sin (* 1/2 (PI))) 4) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) #s(hole binary64 (* 1/32400 (* (pow angle 4) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (* angle (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))))))))) (* 1/32400 (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))) (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 (sin (* 1/2 (PI))) 4) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))) (+ (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 (sin (* 1/2 (PI))) 4) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))))))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))) (+ (* (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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)))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 (sin (* 1/2 (PI))) 4) (+ (* -4 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 2 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3))))))))))))))))))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) #s(hole binary64 (* (pow angle 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 (sin (* 1/2 (PI))) 4) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))) (+ (* (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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)))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 (sin (* 1/2 (PI))) 4) (+ (* -4 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 2 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3)))))))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 (sin (* 1/2 (PI))) 4) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (pow (sin (* 1/2 (PI))) 4)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (+ (* 1/45 (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* angle (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 (sin (* 1/2 (PI))) 4))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* angle (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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)))))) (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 (sin (* 1/2 (PI))) 4))))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* angle (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))))))))))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* angle (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* angle (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))))))))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* angle (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* angle (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (+ (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* angle (+ (* -4 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 2 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3)))))))))))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* angle (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* angle (- (* angle (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 1/16200 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* angle (- (* angle (- (+ (* -1 (* angle (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3))))))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 1/16200 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) #s(hole binary64 (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) #s(hole binary64 (+ (* 2 (* angle (* (pow x-scale 2) (* (pow (sin (* 1/2 (PI))) 3) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) #s(hole binary64 (+ (* angle (+ (* 2 (* (pow x-scale 2) (* (pow (sin (* 1/2 (PI))) 3) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))) (* angle (* (pow x-scale 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) #s(hole binary64 (+ (* angle (+ (* 2 (* (pow x-scale 2) (* (pow (sin (* 1/2 (PI))) 3) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))) (* angle (+ (* angle (* (pow x-scale 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) #s(hole binary64 (pow (sin (* 1/2 (PI))) 6)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) #s(hole binary64 (+ (* 2 (* angle (* (pow (sin (* 1/2 (PI))) 3) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 6))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) #s(hole binary64 (+ (* angle (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* angle (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))))) (pow (sin (* 1/2 (PI))) 6))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) #s(hole binary64 (+ (* angle (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* angle (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (+ (* angle (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))))) (pow (sin (* 1/2 (PI))) 6))))
#s(approx (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) #s(hole binary64 (* 1/8100 (/ (* (pow angle 2) (pow (PI) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))
#s(approx (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/4050 (/ (* angle (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))
#s(approx (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* angle (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 4 (* angle (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))))))))))
#s(approx (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* angle (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* angle (+ (* -4 (* angle (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) #s(hole binary64 (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 2 (* angle (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 2 (* angle (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (* 2 (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 2 (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* angle (+ (* 2 (* angle (- (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))))))))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) #s(hole binary64 (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) #s(hole binary64 (+ (* -1 (/ (* (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))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) #s(hole binary64 (+ (* -1 (/ (* (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 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) #s(hole binary64 (+ (* -1 (/ (* (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 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (- (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) #s(hole binary64 (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2)))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2))) (* -1/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-scale 2))))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2))) (* angle (+ (* -1 (/ (* angle (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2))) (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 2))))))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2))) (* angle (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 2))) (* angle (+ (* -1 (/ (* angle (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 2))) (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2))))))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (* 1/1049760000 (/ (* (pow angle 4) (* (pow b 2) (pow (PI) 4))) (pow x-scale 2)))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 4) (+ (* -1/51018336000000 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 6))) (pow x-scale 2))) (* 1/1049760000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/51018336000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (/ (* (pow angle 2) (* (pow b 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))) (pow x-scale 2))))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/51018336000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 2) (+ (* -1/1574640000 (* (pow (PI) 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 1/16200 (* (pow (PI) 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))) (pow x-scale 2))))))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* 1/1049760000 (* (pow angle 4) (* (pow b 2) (pow (PI) 4))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow angle 4) (+ (* -1/51018336000000 (* (pow angle 2) (* (pow b 2) (pow (PI) 6)))) (* 1/1049760000 (* (pow b 2) (pow (PI) 4)))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* -1/51018336000000 (* (pow b 2) (pow (PI) 6))) (* (pow angle 2) (* (pow b 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* -1/51018336000000 (* (pow b 2) (pow (PI) 6))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/1574640000 (* (pow (PI) 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 1/16200 (* (pow (PI) 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))) (* (pow b 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* 1/1049760000 (* (pow angle 4) (pow (PI) 4)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* (pow angle 4) (+ (* -1/51018336000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1049760000 (pow (PI) 4))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/51018336000000 (pow (PI) 6)) (* (pow angle 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/51018336000000 (pow (PI) 6)) (* (pow angle 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (+ (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow (PI) 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 1/16200 (* (pow (PI) 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))))))))))))))
#s(approx (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) #s(hole binary64 (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2)))))
#s(approx (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2))) (* -1/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-scale 2))))))
#s(approx (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2))) (* angle (+ (* -1 (/ (* angle (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2))) (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 2))))))))
#s(approx (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2))) (* angle (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 2))) (* angle (+ (* -1 (/ (* angle (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 2))) (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2))))))))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2)))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 2))) (/ (* angle (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2)))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 2))) (* angle (+ (/ (* angle (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 2)) (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2)))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2)))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (+ (* 1/45 (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 b 2) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* angle (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 b 2) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #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 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #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 (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/2 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (cos (* 1/2 (PI))))) (* y-scale (sqrt 2)))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* y-scale (sqrt 2)))) (* 1/2 (/ (* 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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* y-scale (sqrt 2)))) (* angle (+ (* 1/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))))) (* 1/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 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))))))))))))))))
#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)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (* (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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-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 (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* 1/90 (* angle (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow y-scale 2) (pow (PI) 2))) (+ (* angle (* (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 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow y-scale 2) (pow (PI) 2))))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow y-scale 2) (pow (PI) 4)))) (* 1/32400 (* (pow y-scale 2) (pow (PI) 2)))))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow y-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow y-scale 2) (pow (PI) 4))) (* (pow angle 2) (* (pow y-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow y-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow y-scale 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow y-scale 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow y-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* (sqrt 8) (sqrt (+ (* 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 (sqrt (+ (* 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(hole binary64 (sqrt (+ (* 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 (pow (sin (* 1/180 (* angle (PI)))) 2) #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 (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 (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 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) #s(hole binary64 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 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)))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))
#s(approx (+ (* 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(hole binary64 (* (pow angle 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 (+ (* 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(hole binary64 (* (pow angle 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) angle)))))))
#s(approx (+ (* 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(hole binary64 (* (pow angle 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) angle)) (/ (pow (sin (* 1/2 (PI))) 2) (pow angle 2))))))))
#s(approx (+ (* 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)))))) #s(hole binary64 (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))
#s(approx (+ (* 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)))))) #s(hole binary64 (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) angle)))))))
#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))))) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (- (/ (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 (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (sqrt (+ (* 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 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) #s(hole binary64 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) #s(hole binary64 (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) #s(hole binary64 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (* (sqrt 8) (+ (* 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 (* (sqrt 8) (+ (* 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 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (* 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)))) 2) (pow x-scale 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) #s(hole binary64 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) #s(hole binary64 (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) #s(hole binary64 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) #s(hole binary64 (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) #s(hole binary64 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) #s(hole binary64 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) #s(hole binary64 (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) #s(hole binary64 (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))
#s(approx (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) #s(hole binary64 (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) #s(hole binary64 (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) #s(hole binary64 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 4)))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (sqrt (+ (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)) (/ (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)) (/ (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 (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)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (* (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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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) (pow (sin (* 1/180 (* angle (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)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* (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)))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#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/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(hole binary64 (* (pow angle 2) (+ (* -1 (/ (+ (* -1 (/ (pow (sin (* 1/2 (PI))) 2) 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))))))))
#s(approx (+ (* 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)))))) #s(hole binary64 (* -1 (* angle (+ (* -1 (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) angle)))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -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 (cos (* 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 (/ (* (+ (* 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 a 2) (pow (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 (cos (* 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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* x-scale (* y-scale (pow 8 1/2))) #s(hole binary64 (* x-scale (* y-scale (sqrt 8)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))) x-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 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 y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (* 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 y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 4)) (pow y-scale 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (/ (+ (* -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))) (* 1/2 (PI)))) 4)) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 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)))) 4)) (pow y-scale 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-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 (/ (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)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (pow (* x-scale y-scale) 2) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (* x-scale y-scale) #s(hole binary64 (* x-scale y-scale)))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (* (pow x-scale 2) (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (* (pow x-scale 2) (+ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (* (pow x-scale 2) (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (+ (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) x-scale)))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) #s(hole binary64 (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) #s(hole binary64 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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))))) x-scale)))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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)))) x-scale)))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (* (sqrt 8) (+ (* 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 (/ (* (sqrt 8) (+ (* 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 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) #s(hole binary64 (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) x-scale)))
#s(approx (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (/ (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (/ (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) #s(hole binary64 (/ (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) #s(hole binary64 (/ (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) #s(hole binary64 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (pow x-scale 2))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) #s(hole binary64 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow x-scale 2))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) #s(hole binary64 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (pow x-scale 2))))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) #s(hole binary64 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (pow x-scale 2))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) #s(hole binary64 (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 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))))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) #s(hole binary64 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 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)))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow x-scale 2))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* 1/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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))) x-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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 (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) #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))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)) (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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* (* y-scale y-scale) (* x-scale x-scale)) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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))))) y-scale) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (/ (* y-scale (sqrt 8)) (pow x-scale 2)) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 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 6) (pow (sin (* 1/180 (* angle (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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 2)))) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (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 x-scale 6) (pow (sin (* 1/180 (* angle (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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (* 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 y-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 y-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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 (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 2) (+ (/ (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* x-scale (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 6)) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* x-scale (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow x-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (* (pow x-scale 4) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 6) (* (pow y-scale 2) (sqrt 1/2)))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt 1/2)))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 6) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow x-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow x-scale 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (* (pow x-scale 6) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (* (pow x-scale 4) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (* x-scale (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow x-scale 2))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (+ (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (+ (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (+ (* 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) #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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) #s(hole binary64 (/ (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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 2) (+ (/ (* (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)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/4 (* (/ (* y-scale (sqrt 8)) (pow x-scale 2)) (sqrt (+ (* 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))))))) (* -1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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))))) y-scale) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/4 (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* 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))))))) (* -1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 6)) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (+ (* -1 (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))) (pow x-scale 2)))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (+ (* -1 (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))) x-scale))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) x-scale))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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)))) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) y-scale) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* (pow y-scale 2) (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) y-scale)))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* (pow y-scale 2) (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (pow 8 1/2)) #s(hole binary64 (* y-scale (sqrt 8))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* 1/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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))) y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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 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)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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)))) 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (* 1/2 (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)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (* 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 4)) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (* y-scale y-scale) #s(hole binary64 (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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (/ (+ (* -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)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 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))) (* 1/2 (PI)))) 4)) (pow x-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))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow y-scale 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (/ (* (pow y-scale 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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2))))))) (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow y-scale 2) (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow y-scale 2) (+ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))))) (* (pow y-scale 2) (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (+ (* (pow y-scale 2) (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (+ (* (pow y-scale 2) (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (+ (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (pow y-scale 2) #s(hole binary64 (pow y-scale 2)))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* 1/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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (PI)))) (sqrt 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))) y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 1/2 (PI)))) 2)))) (+ (* 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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 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))) (* 1/2 (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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) (* 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))) (* 1/2 (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 x-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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (+ (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* y-scale (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 6)) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* y-scale (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* y-scale (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (* (pow y-scale 4) (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* y-scale (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 6) (sqrt 1/2)))))) (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt 1/2)))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 6) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (* (pow y-scale 6) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (* (pow y-scale 4) (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (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 x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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 (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (+ (/ (* (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)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 6)) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
Calls

15 calls:

TimeVariablePointExpression
206.0ms
angle
@0
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) 1/4 (* (sqrt 8) (sqrt (+ (* 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)))))) (sqrt 8) 8 (sqrt (+ (* 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))))) (+ (* 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)))) 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 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 b 2) b (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))) (* 1/2 (PI)) 1/2 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (* (sqrt 2) (sqrt 8)) (sqrt 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) (* y-scale (pow 8 1/2)) (pow 8 1/2) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (+ (* 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)) (+ (* 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)))))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (cos (* 1/2 (PI))) (sin (* 1/2 (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))))) (+ (* -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 (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (* (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))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow (* x-scale y-scale) 2) (* x-scale y-scale) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) (* (sqrt 1/2) (sqrt 8)) (sqrt 1/2) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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))))))) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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)))) 2) (* (sqrt 8) (+ (* 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))))) (* (sqrt 8) (+ (* 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)) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2) (* 4 (/ (* (pow (sin (* 1/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 x-scale 2)) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) 3 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) 6 (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 4) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) (* (pow b 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 x-scale 2)) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))))) (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* y-scale y-scale) (* x-scale x-scale)))
124.0ms
x-scale
@inf
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) 1/4 (* (sqrt 8) (sqrt (+ (* 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)))))) (sqrt 8) 8 (sqrt (+ (* 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))))) (+ (* 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)))) 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 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 b 2) b (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))) (* 1/2 (PI)) 1/2 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (* (sqrt 2) (sqrt 8)) (sqrt 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) (* y-scale (pow 8 1/2)) (pow 8 1/2) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (+ (* 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)) (+ (* 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)))))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (cos (* 1/2 (PI))) (sin (* 1/2 (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))))) (+ (* -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 (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (* (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))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow (* x-scale y-scale) 2) (* x-scale y-scale) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) (* (sqrt 1/2) (sqrt 8)) (sqrt 1/2) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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))))))) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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)))) 2) (* (sqrt 8) (+ (* 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))))) (* (sqrt 8) (+ (* 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)) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2) (* 4 (/ (* (pow (sin (* 1/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 x-scale 2)) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) 3 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) 6 (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 4) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) (* (pow b 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 x-scale 2)) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))))) (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* y-scale y-scale) (* x-scale x-scale)))
119.0ms
x-scale
@-inf
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) 1/4 (* (sqrt 8) (sqrt (+ (* 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)))))) (sqrt 8) 8 (sqrt (+ (* 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))))) (+ (* 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)))) 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 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 b 2) b (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))) (* 1/2 (PI)) 1/2 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (* (sqrt 2) (sqrt 8)) (sqrt 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) (* y-scale (pow 8 1/2)) (pow 8 1/2) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (+ (* 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)) (+ (* 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)))))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (cos (* 1/2 (PI))) (sin (* 1/2 (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))))) (+ (* -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 (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (* (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))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow (* x-scale y-scale) 2) (* x-scale y-scale) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) (* (sqrt 1/2) (sqrt 8)) (sqrt 1/2) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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))))))) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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)))) 2) (* (sqrt 8) (+ (* 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))))) (* (sqrt 8) (+ (* 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)) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2) (* 4 (/ (* (pow (sin (* 1/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 x-scale 2)) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) 3 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) 6 (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 4) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) (* (pow b 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 x-scale 2)) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))))) (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* y-scale y-scale) (* x-scale x-scale)))
93.0ms
x-scale
@0
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) 1/4 (* (sqrt 8) (sqrt (+ (* 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)))))) (sqrt 8) 8 (sqrt (+ (* 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))))) (+ (* 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)))) 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 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 b 2) b (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))) (* 1/2 (PI)) 1/2 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (* (sqrt 2) (sqrt 8)) (sqrt 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) (* y-scale (pow 8 1/2)) (pow 8 1/2) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (+ (* 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)) (+ (* 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)))))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (cos (* 1/2 (PI))) (sin (* 1/2 (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))))) (+ (* -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 (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (* (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))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow (* x-scale y-scale) 2) (* x-scale y-scale) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) (* (sqrt 1/2) (sqrt 8)) (sqrt 1/2) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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))))))) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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)))) 2) (* (sqrt 8) (+ (* 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))))) (* (sqrt 8) (+ (* 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)) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2) (* 4 (/ (* (pow (sin (* 1/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 x-scale 2)) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) 3 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) 6 (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 4) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) (* (pow b 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 x-scale 2)) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))))) (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* y-scale y-scale) (* x-scale x-scale)))
89.0ms
a
@0
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) 1/4 (* (sqrt 8) (sqrt (+ (* 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)))))) (sqrt 8) 8 (sqrt (+ (* 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))))) (+ (* 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)))) 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 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 b 2) b (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))) (* 1/2 (PI)) 1/2 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (* (sqrt 2) (sqrt 8)) (sqrt 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) (* y-scale (pow 8 1/2)) (pow 8 1/2) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (+ (* 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)) (+ (* 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)))))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (cos (* 1/2 (PI))) (sin (* 1/2 (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))))) (+ (* -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 (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (* (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))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow (* x-scale y-scale) 2) (* x-scale y-scale) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) (* (sqrt 1/2) (sqrt 8)) (sqrt 1/2) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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))))))) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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)))) 2) (* (sqrt 8) (+ (* 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))))) (* (sqrt 8) (+ (* 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)) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2) (* 4 (/ (* (pow (sin (* 1/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 x-scale 2)) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) 3 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) 6 (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 4) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) (* (pow b 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 x-scale 2)) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))))) (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (* y-scale y-scale) (* x-scale x-scale)))

rewrite1.8s (2%)

Memory
120.4MiB live, 2 544.7MiB allocated; 465ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
08814623045
09224623045
09224612958
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
1 383 → 1 404
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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))))))))))
y-scale
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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))))))))
#s(literal 1/4 binary64)
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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)))))))
(sqrt.f64 #s(literal 8 binary64))
#s(literal 8 binary64)
(sqrt.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))))))
(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(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
(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/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 2 binary64))
b
(pow.f64 (sin.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)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
(*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
(*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
(*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
x-scale
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))
(*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))
(*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))
(pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))
(pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 4 binary64)
(*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))
(/.f64 #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)))) (*.f64 x-scale x-scale))
#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))))
(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)))
(+.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)))))))
(*.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))))))
#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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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))))))
(fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -1/32400 binary64)
(*.f64 (pow.f64 (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))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))
(*.f64 #s(literal 1/32400 binary64) (*.f64 (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 1/32400 binary64)
(*.f64 (pow.f64 (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))
(*.f64 x-scale x-scale)
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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 (*.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))))))
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(*.f64 x-scale y-scale)
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
(*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
(+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
(*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(literal 1/8 binary64)
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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))))))))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
(*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))
(sqrt.f64 #s(literal 1/2 binary64))
(*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 y-scale #s(literal 2 binary64))
(+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(literal -1/4 binary64)
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sqrt.f64 #s(literal 8 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)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 x-scale #s(literal 2 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 x-scale #s(literal 2 binary64)))
(*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))
(pow.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(literal 3 binary64)
(/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))
(fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.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 -8 binary64)
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.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 -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)) (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)) (*.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 6 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 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 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 4 binary64)) (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)) (*.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 6 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 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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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(literal 6 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 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 6 binary64)))))
(*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
(/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))
(/.f64 (*.f64 (pow.f64 b #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 2 binary64)))
(*.f64 (pow.f64 b #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 4 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))
(*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))
(pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))
(+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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))
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))
(fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* (pow a 2) (* y-scale (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* (pow a 2) (+ (* y-scale (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))) (* (pow a 2) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 3) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 3) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (+ (* 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(hole binary64 (* 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))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/4 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) a)))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (pow a 2))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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)))) 3) (sqrt 1/2)))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow a 2))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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)))) 3) (sqrt 1/2)))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow a 2))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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)))) 3) (sqrt 1/2)))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (pow a 2))))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) #s(hole binary64 (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) #s(hole binary64 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))
#s(approx (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) #s(hole binary64 (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (pow a 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))) (pow a 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))
#s(approx (sqrt (+ (* 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(hole binary64 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 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(hole binary64 (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 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(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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (* (pow a 2) (+ (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (pow a 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (pow a 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))) (pow a 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* (pow b 2) (* y-scale (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* (pow b 2) (+ (* y-scale (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))) (* (pow b 2) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 3) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 3) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (pow b 2) #s(hole binary64 (pow b 2)))
#s(approx b #s(hole binary64 b))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* b (* x-scale (* y-scale (pow 8 1/2)))) #s(hole binary64 (* b (* x-scale (* y-scale (sqrt 8))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/4 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (/ (+ (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) b)))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) #s(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (* (pow b 2) (+ (* 2 (/ (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) #s(hole binary64 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (* (pow b 2) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (* (pow b 2) (+ (* -1/4 (/ (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (/ (* (pow b 2) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) #s(hole binary64 (* (pow b 2) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (pow b 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (pow b 2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))
#s(approx (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (* (pow b 2) (+ (* 1/2 (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (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))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))
#s(approx (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) #s(hole binary64 (* (pow b 2) (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-scale 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) #s(hole binary64 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) #s(hole binary64 (* 2 (/ (* (pow b 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) #s(hole binary64 (/ (* (pow b 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-scale 2))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 2))) (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-scale 2)))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))
#s(approx (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) #s(hole binary64 (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (pow b 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))) (pow b 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 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(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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* b (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow b 2) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (/ (* a (* x-scale (* y-scale (sqrt 8)))) (pow b 2)) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow b 2) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (/ (* x-scale (* y-scale (sqrt 8))) (pow b 2)) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (pow b 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))) (pow b 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (* -1 (* b (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (+ (* angle (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/360 (/ (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (/ (* angle (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/8 (/ (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/90 (/ (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/2 (/ (* angle (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (sqrt (+ (* 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(hole binary64 (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* 1/90 (/ (* angle (* b (* (PI) (cos (* 1/2 (PI)))))) (sqrt 2))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (sqrt 2))) (* 1/2 (/ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (sqrt (+ (* 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(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (+ (* 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(hole binary64 (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* 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(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 (* (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(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 (* (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(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 (* (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 (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 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) #s(hole binary64 (* 2 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (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 (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/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/8 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/2 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* 1/180 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* b (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))))) (* 1/180 (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* angle (+ (* 1/180 (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/34992000 (* b (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* 1/22674816000000 (* (pow angle 2) (* b (* x-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))))))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* angle (+ (* 1/180 (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/34992000 (* b (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* b (* x-scale (* (pow (PI) 7) (* (sqrt 2) (sqrt 8))))))) (* 1/22674816000000 (* b (* x-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8))))))))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) #s(hole binary64 (* 1/180 (* angle (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* 1/180 (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/34992000 (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))) (* 1/22674816000000 (* (pow angle 2) (* x-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8))))))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/34992000 (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* x-scale (* (pow (PI) 7) (* (sqrt 2) (sqrt 8)))))) (* 1/22674816000000 (* x-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) #s(hole binary64 (* 1/180 (* angle (* (PI) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))) (* 1/180 (* (PI) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))) (* 1/22674816000000 (* (pow angle 2) (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* (pow (PI) 7) (* (sqrt 2) (sqrt 8))))) (* 1/22674816000000 (* (pow (PI) 5) (* (sqrt 2) (sqrt 8))))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (cos (* 1/2 (PI))))) (* x-scale (sqrt 2)))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* x-scale (sqrt 2)))) (* 1/2 (/ (* angle (* x-scale (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* x-scale (sqrt 2)))) (* angle (+ (* 1/2 (/ (* angle (* x-scale (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* x-scale (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 2 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/2 (/ (* angle (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* 1/2 (/ (* angle (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (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 (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2)))))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (/ (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 (+ (* 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(hole binary64 (pow (sin (* 1/2 (PI))) 2)))
#s(approx (+ (* 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(hole binary64 (+ (* 1/90 (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (+ (* 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(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 (+ (* 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)))))) #s(hole binary64 (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* 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)))))) #s(hole binary64 (+ (* 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))))))))
#s(approx (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) #s(hole binary64 (* angle (+ (* -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)))) (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))))) #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2)))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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 (/ (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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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))))))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 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))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* 1/90 (* angle (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (* (pow y-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) (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (+ (* angle (* (pow y-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 y-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) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow x-scale 2) (pow (PI) 2))))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow x-scale 2) (pow (PI) 4)))) (* 1/32400 (* (pow x-scale 2) (pow (PI) 2)))))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow x-scale 2) (pow (PI) 4))) (* (pow angle 2) (* (pow x-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow x-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow x-scale 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow x-scale 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow x-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/8 (/ (* angle (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* y-scale (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/2 (/ (* angle (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* y-scale (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (* y-scale (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* (PI) (cos (* 1/2 (PI)))))) (sqrt 2))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (sqrt 2))) (* 1/2 (/ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (cos (* 1/2 (PI))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (+ (* 1/180 (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (+ (* angle (+ (* 1/180 (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2))))) (* angle (+ (* -1/64800 (* b (* (pow (PI) 2) (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) #s(hole binary64 (+ (* angle (+ (* 1/180 (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2))))) (* angle (+ (* -1/64800 (* b (* (pow (PI) 2) (* (sin (* 1/2 (PI))) (sqrt 2))))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* angle (- (* -1/34992000 (* b (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sqrt 2))))) (* 1/5832000 (/ (* (pow a 2) (* (pow (PI) 3) (cos (* 1/2 (PI))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 2)))))))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) #s(hole binary64 (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) #s(hole binary64 (+ (* 1/180 (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) #s(hole binary64 (+ (* angle (+ (* -1/64800 (* angle (* b (* (pow (PI) 2) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (* 1/180 (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) #s(hole binary64 (+ (* angle (+ (* 1/180 (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2))))) (* angle (+ (* -1/64800 (* b (* (pow (PI) 2) (* (sin (* 1/2 (PI))) (sqrt 2))))) (* -1/34992000 (* angle (* b (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sqrt 2)))))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) #s(hole binary64 (* (sin (* 1/2 (PI))) (sqrt 2))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) #s(hole binary64 (+ (* 1/180 (* angle (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) #s(hole binary64 (+ (* angle (+ (* -1/64800 (* angle (* (pow (PI) 2) (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2)))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) #s(hole binary64 (+ (* angle (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (sqrt 2)))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* -1/34992000 (* angle (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sqrt 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) #s(hole binary64 (* 1/32400 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 2))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/5832000 (/ (* (pow a 2) (* angle (* (pow (PI) 3) (cos (* 1/2 (PI)))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 2))))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* angle (- (* angle (- (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (+ (* -1/1049760000 (/ (* (pow a 2) (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (* b (* (pow (sin (* 1/2 (PI))) 3) (sqrt 2))))) (* -1/2099520000 (/ (* (pow a 2) (pow (PI) 4)) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* 1/5832000 (/ (* (pow a 2) (* (pow (PI) 3) (cos (* 1/2 (PI))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 2)))))))))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* angle (- (* angle (- (+ (* -1 (* angle (+ (* -1/1133740800000 (/ (* (pow a 2) (* (pow (PI) 5) (cos (* 1/2 (PI))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 2))))) (+ (* 1/377913600000 (/ (* (pow a 2) (* (pow (PI) 5) (cos (* 1/2 (PI))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 2))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (+ (* -1/1049760000 (/ (* (pow a 2) (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (* b (* (pow (sin (* 1/2 (PI))) 3) (sqrt 2))))) (* -1/2099520000 (/ (* (pow a 2) (pow (PI) 4)) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (sin (* 1/2 (PI))))))))) (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))) (+ (* -1/1049760000 (/ (* (pow a 2) (* (pow (PI) 4) (pow (cos (* 1/2 (PI))) 2))) (* b (* (pow (sin (* 1/2 (PI))) 3) (sqrt 2))))) (* -1/2099520000 (/ (* (pow a 2) (pow (PI) 4)) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* 1/5832000 (/ (* (pow a 2) (* (pow (PI) 3) (cos (* 1/2 (PI))))) (* b (* (pow (sin (* 1/2 (PI))) 2) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))))) (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))) (* angle (+ (* a (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* a (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))) (* angle (+ (* a (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))) (* angle (+ (* a (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (+ (* angle (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* angle (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (+ (* angle (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (+ (* angle (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (+ (* angle (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* 1/16200 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI)))))))))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* 1/16200 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* angle (+ (* -1/2916000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (* (pow (PI) 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/34992000 (/ (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))))))))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI))))))))))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/5832000 (/ (* angle (* (pow b 2) (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (sqrt 8))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI))))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* angle (- (* angle (- (* -1/3149280000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* -1/1049760000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (pow (cos (* 1/2 (PI))) 2) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 3)))) (* -1/2099520000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI))))))))) (* 1/5832000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* angle (- (* angle (- (+ (* -1 (* angle (+ (* -1/1133740800000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/377913600000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 5) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/3149280000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* -1/1049760000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (pow (cos (* 1/2 (PI))) 2) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 3)))) (* -1/2099520000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI)))))))))) (sin (* 1/2 (PI))))))))) (* -1/3149280000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (+ (* -1/1049760000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (pow (cos (* 1/2 (PI))) 2) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 3)))) (* -1/2099520000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/2 (PI))))))))) (* 1/5832000 (/ (* (pow b 2) (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (sqrt 8)))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))))) (* 1/32400 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8)))))) (* (pow angle 2) (* (pow b 2) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8)))))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))) (* (pow b 2) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8)))))) (* 1/32400 (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/3149280000 (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow angle 2) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow angle 2) (+ (* -1/3149280000 (* x-scale (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* (pow angle 2) (+ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow angle 2) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8))))) (* 1/32400 (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8)))) (* (pow angle 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow (PI) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 1/2) (sqrt 8)))) (* (pow angle 2) (+ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* (pow angle 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))))))))))))
#s(approx (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (* (pow a 2) (sin (* 1/2 (PI))))))
#s(approx (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (+ (* 1/180 (* (pow a 2) (* angle (* (PI) (cos (* 1/2 (PI))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (+ (* angle (+ (* -1/64800 (* (pow a 2) (* angle (* (pow (PI) 2) (sin (* 1/2 (PI))))))) (* 1/180 (* (pow a 2) (* (PI) (cos (* 1/2 (PI)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) #s(hole binary64 (+ (* angle (+ (* 1/180 (* (pow a 2) (* (PI) (cos (* 1/2 (PI)))))) (* angle (+ (* -1/64800 (* (pow a 2) (* (pow (PI) 2) (sin (* 1/2 (PI)))))) (* -1/34992000 (* (pow a 2) (* angle (* (pow (PI) 3) (cos (* 1/2 (PI))))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (+ (* angle (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (+ (* angle (+ (* angle (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI))))))))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (* (pow (PI) 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/34992000 (/ (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI)))))))))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI)))))))))) (* (pow y-scale 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (+ (* angle (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (+ (* angle (- (+ (* angle (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (+ (* angle (- (+ (* angle (- (+ (* angle (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (* (pow (PI) 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/34992000 (/ (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) #s(hole binary64 (* -1/129600 (/ (* (pow angle 4) (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))))))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) #s(hole binary64 (* (pow angle 4) (+ (* -1/4 (* angle (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2)))))))) (* -1/129600 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))))))))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) #s(hole binary64 (* (pow angle 4) (+ (* -1/129600 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* angle (+ (* -1/4 (* angle (- (/ (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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)))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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 (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3)))))) (* -1/4 (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2)))))))))))))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) #s(hole binary64 (* (pow angle 4) (+ (* -1/129600 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* angle (+ (* -1/4 (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (* angle (+ (* -1/4 (* angle (- (/ (* (pow b 2) (* x-scale (+ (* -1/6298560000 (* (pow (PI) 4) (* (sqrt 8) (- (+ (* -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/64800 (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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))))))))))) (+ (* 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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (+ (/ (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3)) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (/ (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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)))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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 (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 3))))))) (* -1/4 (- (/ (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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)))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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 (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3)))))))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 4) (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* angle (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2)))))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* angle (- (+ (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* angle (- (/ (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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)))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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 (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2)))))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* angle (- (+ (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* angle (- (+ (* angle (- (/ (* (pow b 2) (* x-scale (+ (* -1/6298560000 (* (pow (PI) 4) (* (sqrt 8) (- (+ (* -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/64800 (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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))))))))))) (+ (* 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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (+ (/ (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3)) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (/ (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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)))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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 (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 3)))))) (/ (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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)))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (+ (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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 (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))) (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* 1/64800 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2))))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 1/32400 (/ (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (* (+ (* 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/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 6) (sqrt 1/2)))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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/32400 (* (pow angle 4) (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/64800 (* angle (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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/32400 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/32400 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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/64800 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/32400 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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/64800 (* (pow b 2) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 (+ (* angle (* (pow b 2) (* x-scale (+ (* -1/6298560000 (* (pow (PI) 4) (* (sqrt 8) (- (+ (* -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/64800 (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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)))))))))))) (* (pow b 2) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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 (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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/32400 (* (pow angle 4) (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/64800 (* angle (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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/32400 (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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/64800 (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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 (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/32400 (* x-scale (* (pow (PI) 2) (* (sqrt 8) (+ (* 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/64800 (* x-scale (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 (+ (* angle (* x-scale (+ (* -1/6298560000 (* (pow (PI) 4) (* (sqrt 8) (- (+ (* -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/64800 (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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))))))))))) (* x-scale (+ (* -1/3149280000 (* (pow (PI) 4) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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/32400 (* (pow angle 4) (* (pow (PI) 2) (* (sqrt 8) (+ (* 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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/64800 (* angle (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* 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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* 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/64800 (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 4) (+ (* 1/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* 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/64800 (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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) (* (sqrt 8) (+ (* 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/32400 (* (pow (PI) 2) (* (sqrt 8) (+ (* -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))))))))) (* angle (+ (* -1/6298560000 (* (pow (PI) 4) (* (sqrt 8) (- (+ (* -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/64800 (* (pow (PI) 2) (* (sqrt 8) (- (+ (* -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 (* (sqrt 8) (+ (* 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) (* (sqrt 8) (+ (* 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 (* (sqrt 8) (+ (* 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/2 (* angle (* (sqrt 8) (- (+ (* -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))))))) (* (sqrt 8) (+ (* 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 (* (sqrt 8) (+ (* 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) (+ (* angle (+ (* 1/2 (* (sqrt 8) (- (+ (* -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 (* (sqrt 8) (+ (* -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)))))))))) (* (sqrt 8) (+ (* 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 (* (sqrt 8) (+ (* 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) (+ (* angle (+ (* 1/2 (* (sqrt 8) (- (+ (* -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/2 (* angle (* (sqrt 8) (- (+ (* -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)))))))) (* (sqrt 8) (+ (* -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))))))))))) (* (sqrt 8) (+ (* 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 (/ (+ (* -1/16200 (/ (* (pow (PI) 2) (pow (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 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (* 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)))) 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 (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) #s(hole binary64 (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))))
#s(approx (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) #s(hole binary64 (+ (* (pow a 2) (* angle (* (sqrt 1/2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))))
#s(approx (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) #s(hole binary64 (+ (* angle (+ (* (pow a 2) (* angle (* (sqrt 1/2) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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) (* (sqrt 1/2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))))
#s(approx (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* (pow a 2) (* angle (* (sqrt 1/2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 a 2) (* (sqrt 1/2) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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) (* (sqrt 1/2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) #s(hole binary64 (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) #s(hole binary64 (+ (* angle (* (sqrt 1/2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) #s(hole binary64 (+ (* angle (+ (* angle (* (sqrt 1/2) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (* (sqrt 1/2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* (sqrt 1/2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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))))))))))))) (* (sqrt 1/2) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))))) (* (sqrt 1/2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow (sin (* 1/2 (PI))) 3) (sqrt 1/2)))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) #s(hole binary64 (pow (sin (* 1/2 (PI))) 3)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) #s(hole binary64 (+ (* angle (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (pow (sin (* 1/2 (PI))) 3))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) #s(hole binary64 (+ (* angle (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -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))) 3))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) #s(hole binary64 (+ (* angle (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* angle (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (+ (* angle (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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)))))))))))) (* (sin (* 1/2 (PI))) (+ (* -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))) 3))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI)))))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (+ (* angle (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (+ (* angle (- (+ (* angle (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (+ (* angle (- (+ (* angle (- (+ (* angle (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (* (pow (PI) 2) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1/34992000 (/ (* x-scale (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* -1/64800 (/ (* x-scale (* (pow (PI) 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (sin (* 1/2 (PI)))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/180 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/2 (PI))))))))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) #s(hole binary64 (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) #s(hole binary64 (+ (* angle (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) #s(hole binary64 (+ (* angle (+ (* angle (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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))))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))) (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))))
#s(approx (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (+ (* angle (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (+ (* angle (+ (* angle (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))))) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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))))))) (* (sqrt 1/2) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))))
#s(approx (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))
#s(approx (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (+ (* angle (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (+ (* angle (+ (* angle (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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))))) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* (sqrt 8) (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (* (sqrt 8) (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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)))))) (* (sqrt 8) (- (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))
#s(approx (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (+ (* -1 (/ (* (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))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))) (* -1/90 (/ (* (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 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (+ (* -1 (/ (* (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))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (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/90 (/ (* (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 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (+ (* -1 (/ (* (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))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* angle (+ (* 1/2 (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))))) (+ (* angle (- (+ (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 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 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 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/90 (/ (* (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) #s(hole binary64 (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 2 (* angle (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))
#s(approx (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 2 (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* angle (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))))))))))
#s(approx (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 2 (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* angle (+ (* -1/4050 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 2 (* angle (- (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))))))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 2))) (pow x-scale 2)))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 4))) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2)))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow angle 2) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (pow x-scale 2))))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))))))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (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 2) (pow (sin (* 1/180 (* angle (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 2) (pow (sin (* 1/180 (* angle (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 (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) #s(hole binary64 (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 2 (* angle (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 2 (* angle (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (* 2 (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 2 (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* angle (+ (* 2 (* angle (- (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))))))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) #s(hole binary64 (* 1/32400 (* (pow angle 4) (* (pow b 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (* angle (* (pow b 2) (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))))) (* 1/32400 (* (pow b 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (* (pow b 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* angle (+ (* 1/32400 (* (pow b 2) (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))))))))) (* angle (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))) (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 (sin (* 1/2 (PI))) 4) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))))))))))))))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (* (pow b 2) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* angle (+ (* 1/32400 (* (pow b 2) (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))))))))) (* angle (+ (* angle (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))) (+ (* (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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)))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 (sin (* 1/2 (PI))) 4) (+ (* -4 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 2 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3)))))))))))))))) (* (pow b 2) (+ (* -1/3149280000 (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))) (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 (sin (* 1/2 (PI))) 4) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) #s(hole binary64 (* 1/32400 (* (pow angle 4) (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (* angle (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))))))))) (* 1/32400 (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))) (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 (sin (* 1/2 (PI))) 4) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) #s(hole binary64 (* (pow angle 4) (+ (* 1/32400 (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))) (* angle (+ (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))) (+ (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 (sin (* 1/2 (PI))) 4) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))))))))) (* angle (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (* 1/32400 (* (pow (PI) 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))) (+ (* (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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)))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 (sin (* 1/2 (PI))) 4) (+ (* -4 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 2 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3))))))))))))))))))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) #s(hole binary64 (* (pow angle 2) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 (sin (* 1/2 (PI))) 4) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) #s(hole binary64 (* (pow angle 2) (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))) (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 3) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))) (+ (* (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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)))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 (sin (* 1/2 (PI))) 4) (+ (* -4 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 2 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3)))))))))))) (+ (* (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 (sin (* 1/2 (PI))) 4) (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))) (* (pow (sin (* 1/2 (PI))) 4) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (pow (sin (* 1/2 (PI))) 4)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (+ (* 1/45 (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* angle (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 (sin (* 1/2 (PI))) 4))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (* angle (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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)))))) (* angle (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 (sin (* 1/2 (PI))) 4))))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* angle (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))))))))))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* angle (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* angle (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))))))))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* angle (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* angle (+ (* -2 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (+ (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* angle (+ (* -4 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3)))))) (* 2 (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3)))))))))))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) #s(hole binary64 (* (pow angle 2) (+ (* -1/16200 (/ (* angle (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* angle (- (* angle (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 1/16200 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* angle (- (* angle (- (+ (* -1 (* angle (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3))))))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (* 1/16200 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9))))))))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) #s(hole binary64 (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) #s(hole binary64 (+ (* 2 (* angle (* (pow x-scale 2) (* (pow (sin (* 1/2 (PI))) 3) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) #s(hole binary64 (+ (* angle (+ (* 2 (* (pow x-scale 2) (* (pow (sin (* 1/2 (PI))) 3) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))) (* angle (* (pow x-scale 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) #s(hole binary64 (+ (* angle (+ (* 2 (* (pow x-scale 2) (* (pow (sin (* 1/2 (PI))) 3) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))) (* angle (+ (* angle (* (pow x-scale 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) #s(hole binary64 (pow (sin (* 1/2 (PI))) 6)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) #s(hole binary64 (+ (* 2 (* angle (* (pow (sin (* 1/2 (PI))) 3) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))))) (pow (sin (* 1/2 (PI))) 6))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) #s(hole binary64 (+ (* angle (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* angle (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))))) (pow (sin (* 1/2 (PI))) 6))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) #s(hole binary64 (+ (* angle (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* angle (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (+ (* angle (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))))) (pow (sin (* 1/2 (PI))) 6))))
#s(approx (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) #s(hole binary64 (* 1/8100 (/ (* (pow angle 2) (pow (PI) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))
#s(approx (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) #s(hole binary64 (* (pow angle 2) (+ (* -1/4050 (/ (* angle (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6))))))))
#s(approx (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* angle (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* 4 (* angle (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))))))))))
#s(approx (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) #s(hole binary64 (* (pow angle 2) (+ (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (* angle (+ (* -1/4050 (/ (* (pow (PI) 2) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 9)))) (* angle (+ (* -4 (* angle (+ (* -1/16200 (/ (* (pow (PI) 2) (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 15)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 2 (/ (* (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12))))))) (pow (sin (* 1/2 (PI))) 3))))))) (* 4 (- (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 6)))) (+ (* -1/8100 (/ (* (pow (PI) 2) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2)) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 2 (* (pow (sin (* 1/2 (PI))) 3) (+ (* -1/64800 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/16200 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (sin (* 1/2 (PI)))))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))))))) (pow (+ (* 1/180 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2)))) (* 1/90 (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 2))))) 2))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 12)))))))))))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) #s(hole binary64 (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 2 (* angle (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 2 (* angle (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (* 2 (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* angle (+ (* 2 (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (* angle (+ (* 2 (* angle (- (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (* 2 (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))))))))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) #s(hole binary64 (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) #s(hole binary64 (+ (* -1 (/ (* (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))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) #s(hole binary64 (+ (* -1 (/ (* (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 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) #s(hole binary64 (+ (* -1 (/ (* (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 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (* angle (- (* -1 (/ (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (sin (* 1/2 (PI))))) (/ (* (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (+ (* -1 (/ (* (pow b 2) (+ (* -1/32400 (* (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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))))) (* -1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) #s(hole binary64 (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2)))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2))) (* -1/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-scale 2))))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2))) (* angle (+ (* -1 (/ (* angle (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2))) (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 2))))))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2))) (* angle (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 2))) (* angle (+ (* -1 (/ (* angle (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 2))) (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2))))))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (* 1/1049760000 (/ (* (pow angle 4) (* (pow b 2) (pow (PI) 4))) (pow x-scale 2)))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 4) (+ (* -1/51018336000000 (/ (* (pow angle 2) (* (pow b 2) (pow (PI) 6))) (pow x-scale 2))) (* 1/1049760000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/51018336000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (/ (* (pow angle 2) (* (pow b 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))) (pow x-scale 2))))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/51018336000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* (pow angle 2) (+ (/ (* (pow angle 2) (* (pow b 2) (+ (* -1/1574640000 (* (pow (PI) 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 1/16200 (* (pow (PI) 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))) (pow x-scale 2))))))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* 1/1049760000 (* (pow angle 4) (* (pow b 2) (pow (PI) 4))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow angle 4) (+ (* -1/51018336000000 (* (pow angle 2) (* (pow b 2) (pow (PI) 6)))) (* 1/1049760000 (* (pow b 2) (pow (PI) 4)))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* -1/51018336000000 (* (pow b 2) (pow (PI) 6))) (* (pow angle 2) (* (pow b 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* -1/51018336000000 (* (pow b 2) (pow (PI) 6))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/1574640000 (* (pow (PI) 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 1/16200 (* (pow (PI) 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))))) (* (pow b 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* 1/1049760000 (* (pow angle 4) (pow (PI) 4)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* (pow angle 4) (+ (* -1/51018336000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1049760000 (pow (PI) 4))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/51018336000000 (pow (PI) 6)) (* (pow angle 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (* (pow angle 4) (+ (* 1/1049760000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/51018336000000 (pow (PI) 6)) (* (pow angle 2) (+ (* 1/9917964518400000000 (pow (PI) 8)) (+ (* 1/16200 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow (PI) 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 1/16200 (* (pow (PI) 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))))))))))))))
#s(approx (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) #s(hole binary64 (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2)))))
#s(approx (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2))) (* -1/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-scale 2))))))
#s(approx (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2))) (* angle (+ (* -1 (/ (* angle (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2))) (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 2))))))))
#s(approx (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2))) (* angle (+ (* -1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 2))) (* angle (+ (* -1 (/ (* angle (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 2))) (* -1 (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2))))))))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2)))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 2))) (/ (* angle (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2)))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 2))) (* angle (+ (/ (* angle (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 x-scale 2)) (/ (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 x-scale 2)))))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)) (pow x-scale 2)))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/2 (PI))) 4))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (+ (* 1/45 (* angle (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (* (pow b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 b 2) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) #s(hole binary64 (+ (* angle (+ (* 1/45 (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))))) (* angle (+ (* angle (* (pow b 2) (+ (* 1/45 (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))) (* 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 b 2) (+ (* 1/8100 (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 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 b 2) (pow (sin (* 1/2 (PI))) 4)))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #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 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) #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 (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/2 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (cos (* 1/2 (PI))))) (* y-scale (sqrt 2)))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* y-scale (sqrt 2)))) (* 1/2 (/ (* 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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* y-scale (sqrt 2)))) (* angle (+ (* 1/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))))) (* 1/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 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))))))))))))))))
#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)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (* (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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-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 (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* 1/90 (* angle (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))) (* (pow x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/32400 (* (pow y-scale 2) (pow (PI) 2))) (+ (* angle (* (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 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 x-scale 2) (pow (sin (* 1/2 (PI))) 2)))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* 1/32400 (* (pow angle 2) (* (pow y-scale 2) (pow (PI) 2))))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow angle 2) (* (pow y-scale 2) (pow (PI) 4)))) (* 1/32400 (* (pow y-scale 2) (pow (PI) 2)))))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow y-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow y-scale 2) (pow (PI) 4))) (* (pow angle 2) (* (pow y-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow y-scale 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow y-scale 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow y-scale 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow y-scale 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* (sqrt 8) (sqrt (+ (* 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 (sqrt (+ (* 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(hole binary64 (sqrt (+ (* 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 (pow (sin (* 1/180 (* angle (PI)))) 2) #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 (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 (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 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) #s(hole binary64 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 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)))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))
#s(approx (+ (* 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(hole binary64 (* (pow angle 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 (+ (* 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(hole binary64 (* (pow angle 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) angle)))))))
#s(approx (+ (* 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(hole binary64 (* (pow angle 2) (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) angle)) (/ (pow (sin (* 1/2 (PI))) 2) (pow angle 2))))))))
#s(approx (+ (* 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)))))) #s(hole binary64 (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)))))))
#s(approx (+ (* 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)))))) #s(hole binary64 (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) angle)))))))
#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))))) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (- (/ (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 (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) #s(hole binary64 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(hole binary64 (sqrt (+ (* 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 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) #s(hole binary64 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) #s(hole binary64 (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) #s(hole binary64 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (* (sqrt 8) (+ (* 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 (* (sqrt 8) (+ (* 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 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (* 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)))) 2) (pow x-scale 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) #s(hole binary64 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) #s(hole binary64 (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))
#s(approx (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))
#s(approx (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) #s(hole binary64 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) #s(hole binary64 (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) #s(hole binary64 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) #s(hole binary64 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) #s(hole binary64 (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) #s(hole binary64 (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) #s(hole binary64 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))
#s(approx (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) #s(hole binary64 (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) #s(hole binary64 (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) #s(hole binary64 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) #s(hole binary64 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 4)))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (sqrt (+ (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)) (/ (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)) (/ (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 (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)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (* (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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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) (pow (sin (* 1/180 (* angle (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)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (+ (* (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)))))
#s(approx (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#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/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(hole binary64 (* (pow angle 2) (+ (* -1 (/ (+ (* -1 (/ (pow (sin (* 1/2 (PI))) 2) 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))))))))
#s(approx (+ (* 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)))))) #s(hole binary64 (* -1 (* angle (+ (* -1 (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) angle)))))))
#s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -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 (cos (* 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 (/ (* (+ (* 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 a 2) (pow (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 (cos (* 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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* x-scale (* y-scale (pow 8 1/2))) #s(hole binary64 (* x-scale (* y-scale (sqrt 8)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))) x-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 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 y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (* 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 y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 4)) (pow y-scale 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (/ (+ (* -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))) (* 1/2 (PI)))) 4)) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 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)))) 4)) (pow y-scale 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-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 (/ (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)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))
#s(approx (pow (* x-scale y-scale) 2) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (* x-scale y-scale) #s(hole binary64 (* x-scale y-scale)))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (* (pow x-scale 2) (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (* (pow x-scale 2) (+ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (* (pow x-scale 2) (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (+ (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (+ (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) x-scale)))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) x-scale)))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) x-scale)))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) #s(hole binary64 (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) #s(hole binary64 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* x-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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))))) x-scale)))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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)))) x-scale)))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (* (sqrt 8) (+ (* 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 (/ (* (sqrt 8) (+ (* 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 (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) #s(hole binary64 (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (* x-scale (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) #s(hole binary64 (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) x-scale)))
#s(approx (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) #s(hole binary64 (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) #s(hole binary64 (/ (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) #s(hole binary64 (/ (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) #s(hole binary64 (/ (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (pow x-scale 2))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) #s(hole binary64 (/ (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow x-scale 2))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) #s(hole binary64 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (pow x-scale 2))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) #s(hole binary64 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow x-scale 2))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) #s(hole binary64 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (pow x-scale 2))))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) #s(hole binary64 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (pow x-scale 2))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) #s(hole binary64 (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 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))))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) #s(hole binary64 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 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)))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) #s(hole binary64 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (pow x-scale 2))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* 1/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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))) x-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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 (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) #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))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)) (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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* (* y-scale y-scale) (* x-scale x-scale)) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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))))) y-scale) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (/ (* y-scale (sqrt 8)) (pow x-scale 2)) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 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 6) (pow (sin (* 1/180 (* angle (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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 2)))) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (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 x-scale 6) (pow (sin (* 1/180 (* angle (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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (* 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 y-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 y-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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 (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 2) (+ (/ (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* x-scale (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 6)) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* x-scale (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow x-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (* (pow x-scale 4) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* x-scale (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 6) (* (pow y-scale 2) (sqrt 1/2)))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow x-scale 4) (* (pow y-scale 2) (sqrt 1/2)))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 6) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow x-scale 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow x-scale 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (* (pow x-scale 6) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (* (pow x-scale 4) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (* (pow x-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (* x-scale (+ (* 2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (pow x-scale 2))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (+ (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (+ (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (+ (* 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) #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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) #s(hole binary64 (/ (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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow x-scale 2) (+ (/ (* (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)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/4 (* (/ (* y-scale (sqrt 8)) (pow x-scale 2)) (sqrt (+ (* 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))))))) (* -1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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))))) y-scale) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/4 (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* 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))))))) (* -1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 6)) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/ (* (pow y-scale 2) (+ (* -1 (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))) (pow x-scale 2)))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) #s(hole binary64 (* -1 (/ (* (pow y-scale 2) (+ (* -1 (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))) x-scale))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (+ (* -1 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* -1 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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 a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) x-scale))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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)))) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) y-scale) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* (pow y-scale 2) (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) y-scale)))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* (pow y-scale 2) (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (pow 8 1/2)) #s(hole binary64 (* y-scale (sqrt 8))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* 1/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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))) y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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 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)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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)))) 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (* 1/2 (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)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (* 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 4)) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (* y-scale y-scale) #s(hole binary64 (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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (/ (+ (* -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)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 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))) (* 1/2 (PI)))) 4)) (pow x-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))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow y-scale 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (/ (* (pow y-scale 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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2))))))) (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow y-scale 2) (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow y-scale 2) (+ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))))) (* (pow y-scale 2) (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (+ (* (pow y-scale 2) (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (+ (* (pow y-scale 2) (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (+ (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (pow y-scale 2) #s(hole binary64 (pow y-scale 2)))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (+ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* 1/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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (PI)))) (sqrt 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))) y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 1/2 (PI)))) 2)))) (+ (* 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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 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))) (* 1/2 (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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) (* 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))) (* 1/2 (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 x-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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (+ (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* y-scale (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 6)) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* y-scale (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* y-scale (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt 1/2)))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (* (pow y-scale 4) (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* y-scale (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 6) (sqrt 1/2)))))) (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (* (pow y-scale 4) (sqrt 1/2)))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 6) (sqrt 1/2))))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow y-scale 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow y-scale 6) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (* (pow y-scale 6) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (* (pow y-scale 4) (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) #s(hole binary64 (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (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 x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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 (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* (pow y-scale 2) (+ (/ (* (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)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 6)) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* -1 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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))))))))))
y-scale
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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))))))))
#s(literal 1/4 binary64)
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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)))))))
(sqrt.f64 #s(literal 8 binary64))
#s(literal 8 binary64)
(sqrt.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))))))
(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 (*.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(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
(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/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 2 binary64))
b
(pow.f64 (sin.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)))
(+.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)
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
(*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
(*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
(*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
x-scale
(*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))
(*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))
(*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))
(pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))
(pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 4 binary64)
(*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))
(/.f64 #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)))) (*.f64 x-scale x-scale))
#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))))
(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)))
(+.f64 (*.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)))
(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 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 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)))))))
(*.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))))))
#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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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))))))
(fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -1/32400 binary64)
(*.f64 (pow.f64 (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))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))
(*.f64 #s(literal 1/32400 binary64) (*.f64 (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 1/32400 binary64)
(*.f64 (pow.f64 (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))
(*.f64 x-scale x-scale)
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (*.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 (*.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))))))
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(*.f64 x-scale y-scale)
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
(*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
(fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
(*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(literal 1/8 binary64)
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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))))))))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
(*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))
(sqrt.f64 #s(literal 1/2 binary64))
(*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 y-scale #s(literal 2 binary64))
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(literal -1/4 binary64)
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sqrt.f64 #s(literal 8 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 (*.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)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 x-scale #s(literal 2 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 x-scale #s(literal 2 binary64)))
(*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))
(pow.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(literal 3 binary64)
(/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))
(fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.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 -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.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 -8 binary64)
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.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 (pow.f64 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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.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 -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)) (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)) (*.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 6 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 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 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 4 binary64)) (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)) (*.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 6 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 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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))
(+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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(literal 6 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 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 6 binary64)))))
(*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))))
(/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))
(+.f64 (*.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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))
(/.f64 (*.f64 (pow.f64 b #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 2 binary64)))
(*.f64 (pow.f64 b #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 4 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))
(/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))
(*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))
(pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))
(+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.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)))))
(*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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))
(/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))
(fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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 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 y-scale y-scale) (*.f64 x-scale x-scale))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.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))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.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)))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (/.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(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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.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)))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (/.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(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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal -1/4 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))))))) (-.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 (*.f64 (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 (/.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 #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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (/.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(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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 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/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 6 binary64))) (*.f64 (pow.f64 b #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)))))) (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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 3 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 3 binary64))))) (*.f64 #s(literal -1/8 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (pow.f64 (sin.f64 (fma.f64 #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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b (*.f64 (pow.f64 y-scale #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/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b (*.f64 (pow.f64 y-scale #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)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 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/2 binary64) (/.f64 (*.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))) (*.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/16 binary64) (/.f64 (*.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))) (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 6 binary64))) (*.f64 (pow.f64 b #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)))))) (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)) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 3 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 3 binary64))))) (*.f64 #s(literal -1/8 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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 4 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 b #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (+ (* 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))))) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* 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))))) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* 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))))) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/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 6 binary64))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (+ (* 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)))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow a 2) (pow (sin (* 1/180 (* angle (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 2) (pow.f64 a #s(literal 2 binary64)))
#s(approx a a)
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 b #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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/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 6 binary64))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (fma.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) a) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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))))))))) a))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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))))))))) (pow.f64 a #s(literal 2 binary64))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (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)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (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 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.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 (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (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)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (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 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (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)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (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 (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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 (/.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))))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal -1/4 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))))))) (-.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))))))) (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/2 binary64) (/.f64 (*.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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 (/.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 (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 (/.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))))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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 (/.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))))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 a (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 a (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (+ (* 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))))) (*.f64 a (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (* 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)))) (*.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 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 a (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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)) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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 (/.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))))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal -1/4 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))))))) (-.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))))))) (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/2 binary64) (/.f64 (*.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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 (/.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 (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 (/.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))))))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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 (/.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))))))))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 a #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #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 4 binary64)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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)))))) (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)) (*.f64 (pow.f64 (sin.f64 (fma.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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 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)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/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 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.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)))) (-.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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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)))))))) (pow.f64 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.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) (+.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.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) (+.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (/.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 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.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) (+.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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (/.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 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal -1/4 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))))))) (-.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 (*.f64 (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 (/.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 #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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (/.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 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.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/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.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/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.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/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.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/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.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/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 y-scale (fma.f64 #s(literal -1/8 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)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.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/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.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/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 y-scale (fma.f64 #s(literal -1/8 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)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (pow.f64 y-scale #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 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (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)) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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 2 binary64)) (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/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 6 binary64))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 3 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))))) (*.f64 #s(literal -1/8 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))) (*.f64 #s(literal 1/8 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.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/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.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/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 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)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 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)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 a #s(literal 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (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/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (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)) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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 2 binary64)) (fma.f64 #s(literal -1/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))) (*.f64 (pow.f64 a #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/16 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))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/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 6 binary64))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 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 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 a #s(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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 3 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))))) (*.f64 #s(literal -1/8 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.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 a #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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 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 (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 a #s(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 3 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))) (*.f64 #s(literal 1/8 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 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)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 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)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.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 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 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)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* 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))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* 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))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #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)) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* 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))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.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 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (pow b 2) (pow.f64 b #s(literal 2 binary64)))
#s(approx b b)
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* b (* x-scale (* y-scale (pow 8 1/2)))) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (+.f64 (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (/.f64 (*.f64 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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (/.f64 (*.f64 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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #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)) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.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 5 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/.f64 (fma.f64 (pow.f64 b #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)))) (sqrt.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))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) b))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) a) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 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 4 binary64)) (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)) (*.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 6 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 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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 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 2 binary64))) (*.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 4 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (*.f64 (pow.f64 b #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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 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 4 binary64)) (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)) (*.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 6 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 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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 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 2 binary64))) (*.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 4 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 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 4 binary64)) (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)) (*.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 6 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 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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 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 2 binary64))) (*.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 4 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 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 4 binary64)) (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)) (*.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 6 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 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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 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 2 binary64))) (*.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 4 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 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 4 binary64)) (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)) (*.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 6 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 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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 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 2 binary64))) (*.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 4 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 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 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 4 binary64)) (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)) (*.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 6 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 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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 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 2 binary64))) (*.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 4 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 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 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 4 binary64)) (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)) (*.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 6 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 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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 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 2 binary64))) (*.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 4 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 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 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 4 binary64)) (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)) (*.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 6 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 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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 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 2 binary64))) (*.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 4 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 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -8 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 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 4 binary64)) (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)) (*.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 6 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 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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 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 2 binary64))) (*.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 4 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))))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 4 binary64)) (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)) (*.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 6 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 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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 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 2 binary64))) (*.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 4 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)))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (*.f64 (pow.f64 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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64))) (*.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 4 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)))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64))) (*.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 4 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))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 2 binary64))) (*.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 4 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.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 (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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(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 (/.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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal -1/4 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))))))) (-.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))))))) (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/2 binary64) (/.f64 (*.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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(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 (/.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 (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 (/.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 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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(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 (/.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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 b (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 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 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 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.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 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (pow.f64 b #s(literal 6 binary64))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 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 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 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.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 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 b (fma.f64 #s(literal -1/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 (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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 b (fma.f64 #s(literal -1/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 (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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (* 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)))) (*.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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 b (fma.f64 #s(literal 1/4 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 b (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/4 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 b (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (fma.f64 #s(literal 1/4 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 b (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 b (fma.f64 #s(literal -1/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 (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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 b (fma.f64 #s(literal -1/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 (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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))))))))) a) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64)))))))) a) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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))))))) (sqrt.f64 (/.f64 #s(literal 1 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 (*.f64 #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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 a #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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(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 (/.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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))) (pow.f64 b #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal -1/4 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))))))) (-.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))))))) (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/2 binary64) (/.f64 (*.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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(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 (/.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 (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 (/.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 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (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 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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(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 (/.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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 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 (/.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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 (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 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 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 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.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 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (pow.f64 b #s(literal 6 binary64))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 b #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #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/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/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)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 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 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 8 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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.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 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #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)))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #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)))))) (pow.f64 (sin.f64 (fma.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 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 a #s(literal 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 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 (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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 a #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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 2 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(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 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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)) (sqrt.f64 #s(literal 8 binary64)))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/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 (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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/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 (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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/4 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/4 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (fma.f64 #s(literal 1/4 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/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 (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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/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 (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 3 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 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 5 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) (*.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (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))) (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 #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 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 #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 #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 (*.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)) (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 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.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 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))) (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 #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)))))))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (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))) (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 #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 b (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 angle #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 (sqrt.f64 #s(literal 8 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))) (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))) (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 #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 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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/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 (*.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 (*.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/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 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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))) (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 #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 (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/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 #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 (*.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)) (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 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.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 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))) (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 #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)))))))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 #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 #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 (*.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)) (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 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.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 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))) (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 #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)))))))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 angle (*.f64 y-scale (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 angle (fma.f64 angle (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 y-scale (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #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 -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (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))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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/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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #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/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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (*.f64 (pow.f64 a #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 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (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 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 (*.f64 #s(literal -2/45 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 #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))) (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 (pow.f64 a #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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 y-scale (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (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 -1/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 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 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #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 -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #s(literal 4 binary64)) (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))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #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/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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (pow.f64 x-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)))) (*.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)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 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 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 (pow.f64 b #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/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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2/45 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 #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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (sin.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 b (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (*.f64 (pow.f64 a #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 x-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 x-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 x-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 x-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 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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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 b #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 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 #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))) (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 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 (*.f64 #s(literal -2/45 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 #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))) (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 (pow.f64 a #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 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal 1/16200 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 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/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 (sqrt.f64 #s(literal 8 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #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/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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 (sqrt.f64 #s(literal 8 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #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/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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (sqrt (+ (* 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))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (sqrt (+ (* 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))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (sqrt (+ (* 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))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (-.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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (sqrt (+ (* 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))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (-.f64 (*.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 #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/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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* 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)))) (*.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 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow a 2) (pow (sin (* 1/180 (* angle (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 2) (pow (sin (* 1/180 (* angle (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 2) (pow (sin (* 1/180 (* angle (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 2) (pow (sin (* 1/180 (* angle (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 (pow (sin (* 1/180 (* angle (PI)))) 2) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (pow (sin (* 1/180 (* angle (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)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (*.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 (pow (sin (* 1/180 (* angle (PI)))) 2) (*.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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))
#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 (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 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 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) (cos.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 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))) (* 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) (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))) (* 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/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 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 (cos.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 1/32400 binary64) (/.f64 (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 x-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 x-scale #s(literal 2 binary64))) (*.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 (PI.f64) #s(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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (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 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)))))) (pow.f64 x-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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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))) (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 x-scale #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 #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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 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 (cos.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 1/32400 binary64) (/.f64 (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 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 (cos.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 1/32400 binary64) (/.f64 (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 x-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 x-scale #s(literal 2 binary64))) (*.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 (PI.f64) #s(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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (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 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)))))) (pow.f64 x-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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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))) (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 x-scale #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 #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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 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 (cos.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 1/32400 binary64) (/.f64 (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 #s(literal 1/180 binary64) (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))
#s(approx (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (*.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 x-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 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 (cos.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 1/32400 binary64) (/.f64 (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 x-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 x-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 x-scale #s(literal 2 binary64))) (*.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 (PI.f64) #s(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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (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 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)))))) (pow.f64 x-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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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))) (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 x-scale #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 #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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-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 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 (cos.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 1/32400 binary64) (/.f64 (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (*.f64 #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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/45 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 #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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #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))) (*.f64 angle (fma.f64 #s(literal 1/45 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))) (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 x-scale #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 #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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #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))) (*.f64 angle (fma.f64 #s(literal 1/45 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))) (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 x-scale #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))) (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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-scale #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/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))) (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 x-scale #s(literal 2 binary64))) (*.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 (PI.f64) #s(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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (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 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)))))) (pow.f64 x-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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (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 (PI.f64) #s(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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (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 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)))))) (pow.f64 x-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 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 #s(literal 2 binary64) (/.f64 (*.f64 (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 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 #s(literal 1/32400 binary64) (/.f64 (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)))))))) (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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 x-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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) (/.f64 (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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (PI.f64) (*.f64 (cos.f64 (*.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 (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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (PI.f64) (*.f64 (cos.f64 (*.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 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (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 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 #s(literal 1/32400 binary64) (/.f64 (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 (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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (PI.f64) (*.f64 (cos.f64 (*.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 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (PI.f64) #s(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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (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 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)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))))) (/.f64 (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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (/ (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 (+ (* 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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))
#s(approx (+ (* 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)) (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 (+ (* 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)) (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 (+ (* 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)))))) (*.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)))))))
#s(approx (+ (* 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)))))) (+.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))))))))
#s(approx (* angle (+ (* -1/32400 (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* 1/32400 (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))))) (*.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)))))))
#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))))) (*.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (/.f64 (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 (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (PI.f64) (*.f64 (cos.f64 (*.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 (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 (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (PI.f64) (*.f64 (cos.f64 (*.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 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 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 #s(literal 1/32400 binary64) (/.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (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 (PI.f64) (*.f64 (cos.f64 (*.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 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 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 #s(literal 1/32400 binary64) (/.f64 (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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #s(literal 1/32400 binary64) (/.f64 (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 (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 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)))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))) (/.f64 (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 (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (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)) (/ (* (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 (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)) (/ (* (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 (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #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 (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)) (/ (* (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 (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 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (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 #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 (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.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))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (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))) (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 x-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)))))))) (/.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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 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))) (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 x-scale #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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (pow.f64 y-scale #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 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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 y-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 y-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 angle (*.f64 (pow.f64 y-scale #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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (* (* x-scale x-scale) (* (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 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (* x-scale x-scale) (* (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 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (* x-scale x-scale) (* (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 x-scale #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 x-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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 (* (* x-scale x-scale) (* (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 x-scale #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 x-scale #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 x-scale #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 x-scale #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 (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #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/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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #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/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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (-.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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (-.f64 (*.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 #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/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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 b #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (fma.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #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))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (fma.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #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))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 angle (-.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/5832000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (fma.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 angle (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/180 binary64) (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (fma.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (fma.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (fma.f64 angle (+.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 angle (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #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))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (*.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))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 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)))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2099520000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/5832000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (*.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))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 angle (-.f64 (*.f64 angle (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/377913600000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.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 -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 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)))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2099520000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 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)))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2099520000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/5832000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 angle (fma.f64 a (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 angle (fma.f64 a (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 angle (fma.f64 a (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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 (*.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/16200 binary64) (/.f64 (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (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))) (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.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))) (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 5 binary64))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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 #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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.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))) (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)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (fma.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/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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/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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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) (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.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))) (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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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 (*.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/16200 binary64) (/.f64 (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (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))) (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.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))) (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 5 binary64))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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 #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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.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))) (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)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (fma.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/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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/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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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) (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.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))) (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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 angle (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 angle (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 angle (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 angle (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 (*.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 (*.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/16200 binary64) (/.f64 (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (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))) (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.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))) (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 5 binary64))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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 #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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (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))) (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 4 binary64)))))) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-scale #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.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))) (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)))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (fma.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/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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/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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(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) (fma.f64 #s(literal -1 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/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 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/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 x-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 (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 y-scale #s(literal 2 binary64))) (*.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))) (-.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 x-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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (pow.f64 b #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 x-scale #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 (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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 b #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)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 x-scale #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)) (-.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 x-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 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.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 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/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 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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (fma.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (fma.f64 angle (fma.f64 angle (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (fma.f64 angle (fma.f64 angle (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 angle (fma.f64 #s(literal -1/2916000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 x-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 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)))) (fma.f64 #s(literal -1 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))) (fma.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 -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -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 -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)))))) (pow.f64 (sin.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/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 -1/34992000 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #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))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/5832000 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2099520000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/5832000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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/1133740800000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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 1/377913600000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2099520000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #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/3149280000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal -1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2099520000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/5832000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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 (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (*.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)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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)) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 angle #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 angle #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (fma.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))) (fma.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 a #s(literal 2 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 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (fma.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (fma.f64 angle (fma.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 x-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 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)))) (fma.f64 #s(literal -1 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))) (fma.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 -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -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 -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)))))) (pow.f64 (sin.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/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 -1/34992000 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #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))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #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 (pow.f64 y-scale #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (fma.f64 angle (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (fma.f64 angle (-.f64 (fma.f64 angle (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #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 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (fma.f64 angle (-.f64 (fma.f64 angle (-.f64 (fma.f64 angle (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 x-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 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)))) (fma.f64 #s(literal -1 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))) (fma.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 -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -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 -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)))))) (pow.f64 (sin.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/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 -1/34992000 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #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))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #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 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (*.f64 #s(literal -1/129600 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal 1/64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (*.f64 #s(literal -1/129600 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal -1/129600 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 angle (fma.f64 #s(literal -1/4 binary64) (*.f64 angle (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal 1/64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (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 1/64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal -1/129600 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 angle (fma.f64 #s(literal -1/4 binary64) (-.f64 (*.f64 #s(literal 1/64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))) (*.f64 angle (fma.f64 #s(literal -1/4 binary64) (*.f64 angle (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (fma.f64 #s(literal -1/6298560000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (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 (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 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/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 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (/.f64 (*.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))))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 1/64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal 1/64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal 1/64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 angle (-.f64 (*.f64 #s(literal 1/64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 1/64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 angle (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal 1/64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 angle (-.f64 (fma.f64 #s(literal 1/64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 angle (-.f64 (fma.f64 angle (-.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (fma.f64 #s(literal -1/6298560000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (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 (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 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/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 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (/.f64 (*.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))))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 1/64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 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)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal 1/64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.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/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal 1/64800 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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/32400 binary64) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/64800 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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/64800 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64)))))))))))))))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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/64800 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (*.f64 angle (fma.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (fma.f64 #s(literal -1/6298560000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (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 (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 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/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 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (/.f64 (*.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))))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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)) (*.f64 x-scale (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))))))))))))))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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/32400 binary64) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/64800 binary64) (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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/64800 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 angle (*.f64 x-scale (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))))))))))))))))))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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/64800 binary64) (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 angle (fma.f64 angle (*.f64 x-scale (fma.f64 #s(literal -1/6298560000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (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 (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 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/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 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (/.f64 (*.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))))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))) (*.f64 x-scale (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64)))))))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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/32400 binary64) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/64800 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64)))))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-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 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))))))))) (*.f64 angle (fma.f64 #s(literal -1/6298560000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (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 (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 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/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 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (/.f64 (*.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))))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))))))))))))
#s(approx (* (sqrt 8) (+ (* 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 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))
#s(approx (* (sqrt 8) (+ (* 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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 angle (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))
#s(approx (* (sqrt 8) (+ (* 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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 angle (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 angle (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64)))))))))) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))
#s(approx (* (sqrt 8) (+ (* 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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 angle (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (*.f64 angle (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (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 (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 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/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 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (/.f64 (*.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))))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))))))))))) (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (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))) (fma.f64 #s(literal 1/2 binary64) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 angle (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 (fma.f64 #s(literal -2 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 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 (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 angle (fma.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/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 (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 (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 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/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 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (/.f64 (*.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))))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 (sin.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 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (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)) (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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (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)) (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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-scale #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 binary64) (/.f64 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/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 (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 x-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 x-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (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 x-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 x-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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (/.f64 (*.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))))) (-.f64 (fma.f64 #s(literal -1/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #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/1458000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/729000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (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 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 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/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 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)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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/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))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/1458000 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/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))))) (pow.f64 x-scale #s(literal 2 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)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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))) (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))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1/1458000 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))) (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))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.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)) (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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 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))) (pow.f64 x-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 x-scale #s(literal 2 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)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (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))) (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))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1/1458000 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))) (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))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.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)) (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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 #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))) (pow.f64 x-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 x-scale #s(literal 2 binary64)))))) (*.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 (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 (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 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))))) (pow.f64 x-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 x-scale #s(literal 2 binary64))))))))))))))))))
#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 (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 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (*.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 x-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 x-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (*.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 x-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 x-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 x-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 x-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (*.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 x-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 x-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 x-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 x-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 x-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 x-scale #s(literal 2 binary64))))))))))))))
#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 (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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.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 (* 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 (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 x-scale #s(literal 2 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 (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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (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))) (pow.f64 x-scale #s(literal 2 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 (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 (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/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))))) (pow.f64 x-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)) (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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (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/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))))) (pow.f64 x-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))) (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 (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 2 binary64)))))) (*.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))) (pow.f64 x-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 x-scale #s(literal 2 binary64)))))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (*.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 (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) (*.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)) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) (fma.f64 angle (fma.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))) (fma.f64 angle (fma.f64 angle (fma.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 angle (*.f64 (sqrt.f64 #s(literal 1/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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) (fma.f64 angle (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) (fma.f64 angle (fma.f64 angle (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 (sqrt.f64 #s(literal 1/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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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)))))))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (fma.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (fma.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 angle (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (fma.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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))))))))))) (*.f64 (sin.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (fma.f64 angle (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (fma.f64 angle (-.f64 (fma.f64 angle (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #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 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (fma.f64 angle (-.f64 (fma.f64 angle (-.f64 (fma.f64 angle (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 x-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 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)))) (fma.f64 #s(literal -1 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))) (fma.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 -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -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 -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)))))) (pow.f64 (sin.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/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 -1/34992000 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #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))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal -1/64800 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/180 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #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 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (pow.f64 a #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) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (fma.f64 angle (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (fma.f64 angle (fma.f64 angle (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 x-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 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)))) (fma.f64 #s(literal -1 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))) (fma.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 -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -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 -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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (fma.f64 angle (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (fma.f64 angle (fma.f64 angle (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 x-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 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)))) (fma.f64 #s(literal -1 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))) (fma.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 -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -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 -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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (fma.f64 angle (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (fma.f64 angle (fma.f64 angle (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 x-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 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)))) (fma.f64 #s(literal -1 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))) (fma.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 -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -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 -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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (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 #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/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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (fma.f64 #s(literal -1 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 (*.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 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (fma.f64 #s(literal -1 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))) (fma.f64 angle (-.f64 (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 #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/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 (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 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (fma.f64 #s(literal -1 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))) (fma.f64 angle (-.f64 (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))) (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) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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/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 (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 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (fma.f64 #s(literal -1 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))) (fma.f64 angle (-.f64 (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))) (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) (fma.f64 #s(literal -1/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 angle (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 x-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 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)))) (fma.f64 #s(literal -1 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))) (fma.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 -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -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 -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)))))) (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/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 (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) (*.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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) (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 #s(literal 2 binary64) (*.f64 angle (-.f64 (*.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 -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)))))))))
#s(approx (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) (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 2 binary64) (-.f64 (*.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 -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/4050 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 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) (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 2 binary64) (-.f64 (*.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 -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/4050 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 2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 x-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 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))) (fma.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 -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -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 -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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (*.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 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (*.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 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 x-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (*.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 (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 x-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 x-scale #s(literal 2 binary64))))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (*.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 (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 x-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 x-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 x-scale #s(literal 2 binary64))))))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (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 2) (pow (sin (* 1/180 (* angle (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 2) (pow (sin (* 1/180 (* angle (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 2) (pow (sin (* 1/180 (* angle (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 (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) (*.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 (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) (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 #s(literal 2 binary64) (*.f64 angle (-.f64 (*.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 -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)))))))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) (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 2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.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 -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))))))))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) (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 2 binary64) (-.f64 (*.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 -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 2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 x-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 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))) (fma.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 -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -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 -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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (*.f64 (pow.f64 b #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 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))))))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #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 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))))))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #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 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))))))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (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 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))))))))) (fma.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))))))))))))))))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #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 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))))))))) (*.f64 angle (fma.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 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 -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))))))) (fma.f64 (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))))) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 15 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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))))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 15 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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))))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))) (pow.f64 (sin.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/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 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))))))))) (fma.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))))))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 angle #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 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 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 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (*.f64 (pow.f64 angle #s(literal 4 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 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 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 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))))))))) (fma.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))))))))))))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (*.f64 (pow.f64 angle #s(literal 4 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 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))))) (*.f64 angle (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 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 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))))))))) (fma.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))))))))) (*.f64 angle (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/45 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 -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))))))))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))))))) (fma.f64 (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))))) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 15 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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))))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 15 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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))))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))))))))))))))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (*.f64 (pow.f64 angle #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 -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 angle (fma.f64 #s(literal 1/45 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 -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 angle (fma.f64 #s(literal 1/45 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 -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))) (fma.f64 angle (fma.f64 #s(literal 1/45 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 -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))))))))) (fma.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 angle (fma.f64 #s(literal 1/45 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 -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))) (fma.f64 angle (fma.f64 #s(literal 1/45 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 -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))))))))) (fma.f64 angle (fma.f64 #s(literal 1/45 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) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))))))) (fma.f64 (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))))) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 15 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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))))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 15 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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))))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))))) (fma.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (fma.f64 #s(literal 1/45 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #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 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (fma.f64 angle (fma.f64 #s(literal 1/45 binary64) (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #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 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 (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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))))))))))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))))))))))))
#s(approx (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))) (fma.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))) (*.f64 angle (fma.f64 #s(literal -4 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 15 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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))))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 15 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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))))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))))))))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (*.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 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))) (*.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (*.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 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 angle (-.f64 (*.f64 angle (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 15 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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))))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))) (*.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))))))))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (fma.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (fma.f64 angle (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (fma.f64 angle (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 angle (fma.f64 angle (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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))))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (fma.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (fma.f64 angle (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 angle (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (fma.f64 angle (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 angle (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 angle (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))
#s(approx (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))
#s(approx (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))))))
#s(approx (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))))))))))))
#s(approx (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)))) (*.f64 angle (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64)))) (*.f64 angle (fma.f64 #s(literal -4 binary64) (*.f64 angle (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 15 binary64)))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (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/180 binary64) (*.f64 (PI.f64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (*.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))))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64))))) (+.f64 (*.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (+.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (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))) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) (*.f64 (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/90 binary64) (*.f64 (PI.f64) (*.f64 (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)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 12 binary64)))))))))))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) (*.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 (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) (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 #s(literal 2 binary64) (*.f64 angle (-.f64 (*.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 -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)))))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) (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 2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.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 -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))))))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) (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 2 binary64) (-.f64 (*.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 -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 2 binary64) (*.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 x-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 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))) (fma.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 -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -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 -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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) (*.f64 #s(literal -1 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 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) (fma.f64 #s(literal -1 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 (-.f64 (*.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 -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))))))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) (fma.f64 #s(literal -1 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 (-.f64 (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 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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))))))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) (fma.f64 #s(literal -1 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 (-.f64 (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 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))) (*.f64 angle (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 x-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 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))) (fma.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 -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 -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 -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)))))) (pow.f64 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.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 -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))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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))))))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale #s(literal 2 binary64)))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale #s(literal 2 binary64))) (*.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (*.f64 #s(literal 1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal -1/51018336000000 binary64) (/.f64 (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (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/51018336000000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-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/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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))))))))
#s(approx (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/1049760000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (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/51018336000000 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-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/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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))))))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 #s(literal 1/1049760000 binary64) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal -1/51018336000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 #s(literal 1/1049760000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))
#s(approx (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/1049760000 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 #s(literal -1/51018336000000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/1049760000 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 #s(literal -1/51018336000000 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 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/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 (sin (* 1/180 (* angle (PI)))) 4) (*.f64 #s(literal 1/1049760000 binary64) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal -1/51018336000000 binary64) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/51018336000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 (sin (* 1/180 (* angle (PI)))) 4) (*.f64 (pow.f64 angle #s(literal 4 binary64)) (fma.f64 #s(literal 1/1049760000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/51018336000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal 1/9917964518400000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1/1574640000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 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 #s(literal 1/16200 binary64) (*.f64 (pow.f64 (PI.f64) #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 (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) (*.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale #s(literal 2 binary64)))))
#s(approx (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale #s(literal 2 binary64))) (*.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)))))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) (/.f64 (*.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 x-scale #s(literal 2 binary64))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) (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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) (fma.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (pow.f64 x-scale #s(literal 2 binary64))) (/.f64 (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)) (fma.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (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/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 2 binary64))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64)))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (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))) (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (fma.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 4 binary64)))))
#s(approx (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (fma.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64))))) (*.f64 angle (fma.f64 angle (*.f64 (pow.f64 b #s(literal 2 binary64)) (fma.f64 #s(literal 1/45 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 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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 2 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(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 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 4 binary64)))))
#s(approx (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (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 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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 (+.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 (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.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))) (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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.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))) (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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 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))) (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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/2 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))) (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 #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/90 binary64) (/.f64 (*.f64 (PI.f64) (*.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))) (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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 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))) (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))) (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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (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 y-scale #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (*.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 y-scale #s(literal 2 binary64))) (*.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (fma.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))) (*.f64 angle (fma.f64 #s(literal 1/45 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))) (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))) (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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (fma.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))) (*.f64 angle (fma.f64 #s(literal 1/45 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))) (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))) (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 (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 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))) (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 #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))))))))))))))))
#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)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (* (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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 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))) (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 #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 (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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (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))) (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 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 (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 x-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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (pow.f64 x-scale #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 x-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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 x-scale #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 y-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (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)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (*.f64 (pow.f64 x-scale #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 y-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))) (fma.f64 angle (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))
#s(approx (* (* y-scale y-scale) (* (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 y-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (* y-scale y-scale) (* (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 y-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (* y-scale y-scale) (* (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 y-scale #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 y-scale #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #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 (* (* y-scale y-scale) (* (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 y-scale #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 y-scale #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 y-scale #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 y-scale #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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (cos.f64 (*.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 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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))))))))
#s(approx (sqrt (+ (* 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))))) (sqrt.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)))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) (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 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 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 (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (sqrt.f64 (+.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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (+.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 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (/ (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 (+ (* 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)) (*.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 #s(literal 1/32400 binary64) (*.f64 (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 (+ (* 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)) (*.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 (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 #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))))) angle))))))
#s(approx (+ (* 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)) (*.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))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (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/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))))) angle) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (pow.f64 angle #s(literal 2 binary64))))))))
#s(approx (+ (* 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)))))) (*.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)))))))
#s(approx (+ (* 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)))))) (*.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 #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))))) angle))))))
#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))))) (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)))) (* 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (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 (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.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 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (fma.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 y-scale #s(literal 2 binary64)) (pow.f64 (sin.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 (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.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))))
#s(approx (* 1/4 (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)))))))))
#s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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))))))))
#s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (sqrt.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)))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (* (sqrt 8) (+ (* 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 (sqrt.f64 #s(literal 8 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 (+ (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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))))
#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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (* (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow.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 (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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 (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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 (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.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 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (*.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 4 binary64)) (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)) (*.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 6 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 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 6 binary64)))))))))
#s(approx (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow.f64 (sin.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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (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)) (*.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 6 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 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 6 binary64)))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 binary64)))))
#s(approx (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (*.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 6 binary64))))
#s(approx (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow.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 (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (*.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 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 6 binary64))))))
#s(approx (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.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 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.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 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 4) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (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)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (* (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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (/.f64 (+.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))) (*.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 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)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+.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))) (*.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 y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (*.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 (+ (* 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/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)) (*.f64 (pow.f64 angle #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) angle) (*.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))))))) 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))))))))
#s(approx (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 angle (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (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/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))))) angle))))))
#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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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)))))))) (sqrt.f64 (/.f64 #s(literal 1 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)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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))))))) (sqrt.f64 (/.f64 #s(literal 1 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)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.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))))) #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))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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))))))) (sqrt.f64 (/.f64 #s(literal 1 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)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.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))))) #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)))))))))) (sqrt.f64 (/.f64 #s(literal 1 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)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (+.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 (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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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 #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 #s(literal 1/4 binary64) (/.f64 (pow.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))))) (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.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))))) #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))))))))) (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))))))))))) (sqrt.f64 (/.f64 #s(literal 1 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)))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))))))) y-scale) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.f64 (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 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.f64 (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 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #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 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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #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 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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #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 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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)))) (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #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 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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #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 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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 b (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 #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 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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)))) (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx x-scale x-scale)
#s(approx (* x-scale (* y-scale (pow 8 1/2))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #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 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)))) (sqrt.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)))) (sqrt.f64 #s(literal 2 binary64)))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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 #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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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)))) (sqrt.f64 #s(literal 2 binary64)))))))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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 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 (fma.f64 #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 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)))) (sqrt.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 #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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #s(literal 2 binary64)))) (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 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 (fma.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 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))) x-scale))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (*.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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #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 y-scale #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #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 (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 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 (fma.f64 #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 y-scale #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))) (pow.f64 (sin.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 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 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 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 (fma.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 y-scale #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))) (pow.f64 (sin.f64 (fma.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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 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 (fma.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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (fma.f64 #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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 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 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 (fma.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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (fma.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (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 (fma.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 (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 4 binary64))) (pow.f64 x-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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))) (* x-scale x-scale)) (/ (* (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 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))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (+.f64 (/.f64 (*.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))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.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))))
#s(approx (pow (* x-scale y-scale) 2) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (* x-scale y-scale) (*.f64 x-scale y-scale))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 a (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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/16 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 8 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 4 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 y-scale #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/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (+.f64 (*.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 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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 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/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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/16 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 8 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 4 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 y-scale #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/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (+.f64 (*.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 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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 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/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (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/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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/16 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 8 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/64 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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 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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 y-scale #s(literal 4 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 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)) (fma.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (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 4 binary64)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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 y-scale #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/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))) (+.f64 (*.f64 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (+.f64 (*.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 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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 #s(literal -1 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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #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)))) (fma.f64 #s(literal 1/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 (pow.f64 (sin.f64 (fma.f64 #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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 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 8 binary64)))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)) (fma.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)) (*.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 6 binary64)))) (*.f64 #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 (pow.f64 y-scale #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b #s(literal 2 binary64)) (pow.f64 (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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (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 (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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.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))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) x-scale))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (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 (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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.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))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) x-scale))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (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 (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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.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))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) x-scale))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (/.f64 (fma.f64 #s(literal -1/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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (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 (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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.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))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) x-scale))
#s(approx (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (*.f64 #s(literal -1/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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))))))
#s(approx (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))) (/.f64 (*.f64 (pow.f64 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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))))
#s(approx (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (pow.f64 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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) x-scale))
#s(approx (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) x-scale))
#s(approx (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (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 (* (sqrt 8) (+ (* 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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (sin.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 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale 2) (pow.f64 x-scale #s(literal 2 binary64)))
#s(approx (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.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))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 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 (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.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))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 2 binary64)) (pow.f64 (sin.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 (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.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))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.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))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (fma.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))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))))) (/.f64 (fma.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))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 x-scale #s(literal 2 binary64))))
#s(approx (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)))) (/.f64 (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 x-scale #s(literal 2 binary64))))
#s(approx (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))) (/.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 4 binary64)) (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 (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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (/.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)) (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 (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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (/.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 (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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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))) (*.f64 #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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))))))
#s(approx (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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)) (/.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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)))))
#s(approx (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))) (/.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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 #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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 #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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (pow.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 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))) x-scale))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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))) (fma.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))))) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale))) (/.f64 (+.f64 (/.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 (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.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 y-scale) (* x-scale x-scale)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (pow.f64 y-scale #s(literal 2 binary64))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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/4 binary64) (/.f64 (pow.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))))) #s(literal 2 binary64)) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (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 #s(literal 1/2 binary64) (/.f64 (*.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))))) (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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/4 binary64) (/.f64 (pow.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))))) #s(literal 2 binary64)) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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/4 binary64) (/.f64 (pow.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))))) #s(literal 2 binary64)) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))))))) y-scale) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)))))) y-scale) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.f64 (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 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (sqrt.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)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.f64 (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 (sqrt.f64 #s(literal 8 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (sqrt.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)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (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 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (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 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (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 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.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 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (*.f64 #s(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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (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 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (*.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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 (pow.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (fma.f64 #s(literal 1/180 binary64) (*.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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 (pow.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.f64 #s(literal 1/180 binary64) (*.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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (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))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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 x-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 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.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))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (*.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (-.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 (fma.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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (-.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 (fma.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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.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 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 x-scale (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #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 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 x-scale (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 4 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 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #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 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 x-scale (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (-.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 (fma.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 (pow.f64 x-scale #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 6 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 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 4 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 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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #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 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (*.f64 x-scale (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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (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 (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)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.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))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (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 (pow.f64 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (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 (pow.f64 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (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 (pow.f64 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (*.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) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 2 binary64) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (fma.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 (pow.f64 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (fma.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 (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.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))))
#s(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.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)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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/4 binary64) (/.f64 (pow.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))))) #s(literal 2 binary64)) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 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))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (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 #s(literal 1/2 binary64) (/.f64 (*.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))))) (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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/4 binary64) (/.f64 (pow.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))))) #s(literal 2 binary64)) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(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/4 binary64) (/.f64 (pow.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))))) #s(literal 2 binary64)) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))))))) y-scale) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (sqrt.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 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)))))) y-scale) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) (pow.f64 x-scale #s(literal 2 binary64))) (sqrt.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 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))) (sqrt.f64 (/.f64 #s(literal 1 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 (sin.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/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 4 binary64)) (*.f64 #s(literal 1/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 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (-.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 (fma.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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.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 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (-.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 (fma.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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.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 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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))) (-.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 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))) (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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.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 (fma.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 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 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 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64)))))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 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 (pow.f64 (sin.f64 (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 -1 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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))) (*.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 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 4 binary64)) (*.f64 #s(literal 1/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 6 binary64)))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.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)))))) (*.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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 6 binary64))) (*.f64 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.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 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 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)) (*.f64 (sqrt.f64 #s(literal 8 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)) (*.f64 (pow.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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 y-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 y-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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))))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.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 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.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))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (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 (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)) (sqrt.f64 #s(literal 1/2 binary64)))))))) (pow.f64 x-scale #s(literal 2 binary64)))))))
#s(approx (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.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))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (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 (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)) (sqrt.f64 #s(literal 1/2 binary64)))))))) x-scale)))
#s(approx (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.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))) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 4 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.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 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 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (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 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 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.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 (sin.f64 (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 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 (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 (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)) (sqrt.f64 #s(literal 1/2 binary64))))))) x-scale)))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 x-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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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))))))) (pow.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)) (*.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))) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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)))))) (pow.f64 (sin.f64 (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)) (pow.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))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 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 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 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/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 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/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (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(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 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/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 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/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (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(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 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/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (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 (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 (*.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)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (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(literal 2 binary64)) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.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 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))))))) y-scale) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))))))) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))))))))) y-scale))
#s(approx y-scale y-scale)
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))))))) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 #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 x-scale #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 #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 x-scale #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 #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 x-scale #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))))) (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 (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 #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 x-scale #s(literal 2 binary64)))) (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 #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 x-scale #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 #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 x-scale #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 #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 x-scale #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))))) (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 (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 #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 x-scale #s(literal 2 binary64)))) (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* y-scale (pow 8 1/2)) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (*.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 x-scale #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 #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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))) (sqrt.f64 #s(literal 2 binary64)))))))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 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 #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 x-scale #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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 #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 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))))) (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 (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 #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 x-scale #s(literal 2 binary64)))) (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 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 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.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 (*.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 x-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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))) y-scale))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.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 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 (*.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 x-scale #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.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 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 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))))) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.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 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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))))))) (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 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 (*.f64 #s(literal 1/180 binary64) (*.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 x-scale #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)))))) (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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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))))))) (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 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 (*.f64 #s(literal 1/180 binary64) (*.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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (fma.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 (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 (* y-scale y-scale) (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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (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 (*.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))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 (fma.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 (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))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (/.f64 (-.f64 (/.f64 (*.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))) (pow.f64 (sin.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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (+.f64 (/.f64 (*.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))) (pow.f64 (sin.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))) (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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 a (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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/8 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 6 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))) (fma.f64 #s(literal -1/16 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.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)))) (-.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/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.f64 (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 -1 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))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.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)) (*.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 6 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 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 6 binary64)))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (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 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))) (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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))) (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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))) (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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))))) (*.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))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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/8 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 6 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))) (fma.f64 #s(literal -1/16 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.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)))) (-.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/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.f64 (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 -1 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))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.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)) (*.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 6 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 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 6 binary64)))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (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 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))) (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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))))) (*.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 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))) (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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 binary64))))))))) (*.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 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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/8 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 6 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))) (fma.f64 #s(literal -1/16 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.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)))) (-.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/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (pow.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 #s(literal 1/64 binary64) (/.f64 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 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 6 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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)))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.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 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (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)) (*.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 6 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 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 6 binary64)))))))) (*.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 x-scale #s(literal 4 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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)) (*.f64 (pow.f64 (sin.f64 (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 -1 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))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.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)) (*.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 6 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 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 6 binary64)))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (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 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 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))))) (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)) (*.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 6 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 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 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 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 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 (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 8 binary64)))))))))))))) (*.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 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (pow y-scale 2) (pow.f64 y-scale #s(literal 2 binary64)))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #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 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (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 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (fma.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (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 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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)))) (sqrt.f64 #s(literal 2 binary64)))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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 #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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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 #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 (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 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 (pow.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)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))) y-scale))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #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/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #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/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #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/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 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))) (sqrt.f64 (/.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)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))) (sqrt.f64 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/4 binary64) (/.f64 (pow.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 (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))))) (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 #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)))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.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)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))) (sqrt.f64 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (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)))))) (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 #s(literal 1/2 binary64) (/.f64 (*.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 (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))))) (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 #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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/4 binary64) (/.f64 (pow.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 (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))))) (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 #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))))))))) (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)))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/4 binary64) (/.f64 (pow.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 (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))))) (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 #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)))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.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)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 2 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.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 x-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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 2 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.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 x-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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (*.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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 2 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.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 x-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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (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 (pow.f64 (sin.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (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)))) (fma.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 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (pow.f64 (sin.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (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)))) (fma.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 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 #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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (pow.f64 (sin.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 (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 (pow.f64 (sin.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-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))) (fma.f64 #s(literal -1 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.f64 (*.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))) (pow.f64 (sin.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (*.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #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)))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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 y-scale #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #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))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 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)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 y-scale #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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 y-scale #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #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))))))))))))))))))
#s(approx (+ (* 2 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #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 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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 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))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (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)))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* 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)))) (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))))))))
#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 (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (+.f64 (/.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)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))) (sqrt.f64 (/.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)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))) (sqrt.f64 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/4 binary64) (/.f64 (pow.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 (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))))) (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 #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)))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.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)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))) (sqrt.f64 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.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 (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)))))) (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 #s(literal 1/2 binary64) (/.f64 (*.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 (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))))) (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 #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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/4 binary64) (/.f64 (pow.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 (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))))) (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 #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))))))))) (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)))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 (/.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)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/4 binary64) (/.f64 (pow.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 (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))))) (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 #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)))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 (/.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)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 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 (fma.f64 (pow.f64 a #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 x-scale #s(literal 2 binary64))) (*.f64 #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 x-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 (sin.f64 (fma.f64 #s(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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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))) (sqrt.f64 (/.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 2 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.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 x-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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (fma.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 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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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 (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 x-scale #s(literal 2 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.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 x-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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.f64 #s(literal 1/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 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 (fma.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 x-scale #s(literal 2 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y-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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (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)))) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64)))))))))
#s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.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)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 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 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 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))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 x-scale #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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (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 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 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/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 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (pow.f64 x-scale #s(literal 2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (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)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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)))))) (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)) (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 (*.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 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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 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)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 6 binary64))) (*.f64 #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 (fma.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 4 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))) (pow.f64 x-scale #s(literal 2 binary64)))) (*.f64 #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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64)))))))) (pow.f64 (sin.f64 (*.f64 #s(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 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (pow.f64 y-scale #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)) (*.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (fma.f64 #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)))) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (*.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))))))) (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 (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.f64 (fma.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/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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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)))))) (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)) (pow.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 x-scale #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))

eval1.7s (1.9%)

Memory
58.2MiB live, 3 162.1MiB allocated; 403ms collecting garbage
Compiler

Compiled 3 183 072 to 26 365 computations (99.2% saved)

prune15.0s (16.7%)

Memory
371.0MiB live, 26 712.1MiB allocated; 4.7s collecting garbage
Pruning

42 alts after pruning (38 fresh and 4 done)

PrunedKeptTotal
New2 984163 000
Fresh62228
Picked235
Done011
Total2 992423 034
Accuracy
73.7%
Counts
3 034 → 42
Alt Table
Click to see full alt table
StatusAccuracyProgram
2.0%
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (/.f64 (fma.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)) (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 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
6.5%
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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(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))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
3.1%
(/.f64 (neg.f64 #s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
4.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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 (+ (* (* a a) (* (sin (+ (* 1/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))))))) (*.f64 y-scale y-scale)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
3.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) #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)))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 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(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
✓45.2%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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)))))))))))
17.3%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(approx (sqrt (+ (* 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))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
9.8%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(approx (sqrt (+ (* 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))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))
15.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(approx (sqrt (+ (* 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))))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))
17.3%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
▶35.3%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
15.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
5.5%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
6.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 #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)))) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
14.3%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #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/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 y-scale #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
15.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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)))) (sqrt.f64 #s(literal 2 binary64)))) y-scale)))))))
15.4%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))))))
22.8%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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)))))))))))
17.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
▶23.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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)))))))))))
45.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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 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)))))
43.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))))
42.4%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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) #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(literal 1/2 binary64)))))
✓37.5%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
37.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.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)))))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
9.2%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
34.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (fma.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #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))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 angle (-.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/5832000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))))
▶45.2%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)))))))))
41.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))))
41.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))
▶21.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
11.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.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 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
5.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (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)))))))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
20.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-scale #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
19.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 1/2 binary64)))))
35.3%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))))
✓35.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
16.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
9.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
✓8.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
9.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
▶10.2%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))
Compiler

Compiled 45 076 to 10 366 computations (77% saved)

series1.2s (1.4%)

Memory
85.4MiB live, 2 529.5MiB allocated; 264ms collecting garbage
Counts
100 → 807
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)))))))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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))))))))
#s(literal 1/4 binary64)
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)))))))
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
y-scale
(sqrt.f64 #s(literal 8 binary64))
#s(literal 8 binary64)
(sqrt.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))))))
(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)))))
#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
(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/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(*.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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 b #s(literal 2 binary64))
b
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))
(*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
(*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
(*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
(*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
x-scale
(*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64))))
(*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))
(*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))
(*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))
(*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))
(pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(pow.f64 (+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64))
(+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 4 binary64)
(*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 x-scale x-scale)
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 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 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 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))
(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))
(pow.f64 x-scale #s(literal 2 binary64))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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)))))
(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))))
(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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (pow.f64 (sin.f64 (*.f64 #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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
(*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
(*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
(*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/4 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 5) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 5) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 5) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) a)))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (pow a 2))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* (pow a 2) (* y-scale (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* (pow a 2) (+ (* y-scale (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))) (* (pow a 2) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 3) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 3) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* a (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (pow a 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))) (pow a 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (pow a 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))) (pow a 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/4 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 6)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (pow b 2) #s(hole binary64 (pow b 2)))
#s(approx b #s(hole binary64 b))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/180 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))) #s(hole binary64 (* 1/180 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) #s(hole binary64 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* b (* x-scale (* y-scale (pow 8 1/2)))) #s(hole binary64 (* b (* x-scale (* y-scale (sqrt 8))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* (pow b 2) (* y-scale (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* (pow b 2) (+ (* y-scale (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))) (* (pow b 2) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 3) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 3) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))) #s(hole binary64 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* b (+ (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* b (+ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* b (+ (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2))) (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow b 2) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (/ (* a (* x-scale (* y-scale (sqrt 8)))) (pow b 2)) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow b 2) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (/ (* x-scale (* y-scale (sqrt 8))) (pow b 2)) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (pow b 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))) (pow b 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* b (+ (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (pow b 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))) (pow b 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* 1/2 (/ (* (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))))) (* b (sqrt 2)))) (* b (* y-scale (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* b (* y-scale (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))) (* b (sqrt 2)))) (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* b (* y-scale (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2))))))) (* b (sqrt 2)))) (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* 1/2 (/ (* (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* b (sqrt 2))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* b (sqrt 2)))) (* b (sqrt 2)))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))) (* b (sqrt 2)))) (* 1/2 (/ (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) (* b (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* 1/2 (/ (* (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))) (* (pow b 2) (pow (sqrt 2) 2)))))) (* b (sqrt 2)))) (* 1/2 (/ (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2))))) (* b (sqrt 2)))))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (+ (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 (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 (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 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* -1/16200 (* (pow angle 2) (* (pow b 2) (pow (PI) 2)))) (* 2 (pow b 2)))))
#s(approx (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 2 (* (pow angle 2) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))
#s(approx (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (pow b 2)))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ (* -1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2)))) (pow b 2))))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (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 2) (pow (cos (* 1/180 (* angle (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 (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 1))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 1))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* 1/180 (* angle (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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/8 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/2 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* 1/180 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* b (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))))) (* 1/180 (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* angle (+ (* 1/180 (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/34992000 (* b (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* 1/22674816000000 (* (pow angle 2) (* b (* x-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))))))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* angle (+ (* 1/180 (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/34992000 (* b (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* b (* x-scale (* (pow (PI) 7) (* (sqrt 2) (sqrt 8))))))) (* 1/22674816000000 (* b (* x-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8))))))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (cos (* 1/2 (PI))))) (* x-scale (sqrt 2)))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* x-scale (sqrt 2)))) (* 1/2 (/ (* angle (* x-scale (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* x-scale (sqrt 2)))) (* angle (+ (* 1/2 (/ (* angle (* x-scale (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* x-scale (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 2 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/2 (/ (* angle (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* 1/2 (/ (* angle (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (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 (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2)))))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (/ (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)))) (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))))) #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2)))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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 (/ (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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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))))))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-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 (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))))
#s(approx (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) #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 (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) #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))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2)))))
#s(approx (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) #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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) #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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) #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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) #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 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) #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 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) #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 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) #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 (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 (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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))))) (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))) (* angle (+ (* a (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* a (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))) (* angle (+ (* a (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))) (* angle (+ (* a (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* 1/90 (/ (* angle (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/2 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (cos (* 1/2 (PI))))) (* y-scale (sqrt 2)))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* y-scale (sqrt 2)))) (* 1/2 (/ (* 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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* y-scale (sqrt 2)))) (* angle (+ (* 1/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))))) (* 1/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 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))))))))))))))))
#s(approx (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(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))))
#s(approx (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(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 (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(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 (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(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 (/ (* (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(hole binary64 (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4))))
#s(approx (+ (* 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(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 (/ (* (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(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 (/ (* (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(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 (/ (* (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(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 (/ (* (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(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 (/ (* (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(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 (/ (* (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(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 (* (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 (- (/ (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(hole binary64 (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4))))
#s(approx (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(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 (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(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 (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(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 (- (/ (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(hole binary64 (* -1 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (- (/ (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(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 (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(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 (- (/ (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(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 (/ (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 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) #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 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) #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 (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(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))))
#s(approx (+ (/ (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(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 (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(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))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (+ (/ (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(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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (+ (* angle (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/360 (/ (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (/ (* angle (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/8 (/ (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/90 (/ (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/2 (/ (* angle (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #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 (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 2)))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 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)))) (* 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))) (/ (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)))) (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))))) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (- (/ (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 (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 y-scale 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 y-scale 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 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 (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/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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))) (+ (/ (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 (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(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 (/ (* (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(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 (/ (* (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(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 (* (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 (- (/ (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(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 (- (/ (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(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 (/ (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 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))
#s(approx (+ (/ (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(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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* (sqrt 8) (sqrt (+ (* 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 (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -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 (cos (* 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 (/ (* (+ (* 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 a 2) (pow (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 (cos (* 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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))) #s(hole binary64 (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* x-scale (* y-scale (pow 8 1/2))) #s(hole binary64 (* x-scale (* y-scale (sqrt 8)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))) x-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 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 y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (* 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 y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 4)) (pow y-scale 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (/ (+ (* -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))) (* 1/2 (PI)))) 4)) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 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)))) 4)) (pow y-scale 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-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 (/ (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)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))
#s(approx (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (/ (+ (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (* (pow x-scale 2) (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (* (pow x-scale 2) (+ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (* (pow x-scale 2) (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* x-scale (* y-scale (sqrt 8))) #s(hole binary64 (* x-scale (* y-scale (sqrt 8)))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* 1/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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) x-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))) x-scale)))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (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(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (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(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 (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(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 (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(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 (/ (* (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(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))
#s(approx (+ (* 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(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 (/ (* (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(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 (* (pow x-scale 2) (pow y-scale 2)) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (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(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))
#s(approx (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(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 (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(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 (- (/ (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(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (- (/ (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(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 (+ (/ (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(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (+ (/ (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(hole binary64 (/ (+ (/ (* (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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 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 6) (pow (sin (* 1/180 (* angle (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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 2)))) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (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 x-scale 6) (pow (sin (* 1/180 (* angle (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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (* 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 y-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 y-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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 (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 y-scale 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 y-scale 2))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* x-scale (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 6)) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale)))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale))))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (* 2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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)))) (+ (* 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 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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)))) (+ (* 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 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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)))) (+ (* 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 (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(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))
#s(approx (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(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 (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(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 (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(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 (/ (* (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(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4))))
#s(approx (+ (* 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(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 (/ (* (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(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 (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(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4))))
#s(approx (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(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 (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(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 (- (/ (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(hole binary64 (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))
#s(approx (+ (/ (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(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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))))) y-scale) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (/ (* y-scale (sqrt 8)) (pow x-scale 2)) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 6)) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/4 (* (/ (* y-scale (sqrt 8)) (pow x-scale 2)) (sqrt (+ (* 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))))))) (* -1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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))))) y-scale) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/4 (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* 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))))))) (* -1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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)))) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (* y-scale (sqrt 8)) #s(hole binary64 (* y-scale (sqrt 8))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (pow 8 1/2)) #s(hole binary64 (* y-scale (sqrt 8))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* 1/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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))) y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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 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)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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)))) 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (* 1/2 (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)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (* 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 4)) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (* y-scale y-scale) #s(hole binary64 (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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (/ (+ (* -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)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 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))) (* 1/2 (PI)))) 4)) (pow x-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))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow y-scale 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (/ (* (pow y-scale 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 (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (/ (+ (/ (* (pow y-scale 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 (pow y-scale 2) #s(hole binary64 (pow y-scale 2)))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2))))))) (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow y-scale 2) (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow y-scale 2) (+ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))))) (* (pow y-scale 2) (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* 1/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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (PI)))) (sqrt 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) y-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) y-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))) y-scale)))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (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 y-scale 2))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2))))
#s(approx (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(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 (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(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 (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(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 (/ (* (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(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 (/ (* (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(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 (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(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 (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(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 (- (/ (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(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 (+ (/ (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(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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) y-scale) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* (pow y-scale 2) (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) y-scale)))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* (pow y-scale 2) (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 1/2 (PI)))) 2)))) (+ (* 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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 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))) (* 1/2 (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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) (* 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))) (* 1/2 (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 x-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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* y-scale (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 6)) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale)))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale))))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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)))) (+ (* 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 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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)))) (+ (* 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 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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)))) (+ (* 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 (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(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 (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(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 (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(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 (/ (* (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(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 (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(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 (- (/ (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(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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 6)) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))))))
Calls

15 calls:

TimeVariablePointExpression
107.0ms
y-scale
@0
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* y-scale (sqrt 8)) y-scale (sqrt 8) 8 (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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)))) 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow b 2) b (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/180 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))) (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))) (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))) x-scale (* (PI) (* (sqrt 2) (sqrt 8))) (* (sqrt 2) (sqrt 8)) (sqrt 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) (* y-scale (pow 8 1/2)) (pow 8 1/2) 1/2 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)) (* (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) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)) (pow y-scale 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) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* 1/2 (PI)) (pow x-scale 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (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)) (/ (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))) (+ (* 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 (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))) (* 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)) (/ (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)) (/ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (* (sqrt 8) (sqrt (+ (* 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)))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))) (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))) (sin (* 1/2 (PI))))
81.0ms
angle
@0
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* y-scale (sqrt 8)) y-scale (sqrt 8) 8 (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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)))) 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow b 2) b (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/180 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))) (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))) (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))) x-scale (* (PI) (* (sqrt 2) (sqrt 8))) (* (sqrt 2) (sqrt 8)) (sqrt 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) (* y-scale (pow 8 1/2)) (pow 8 1/2) 1/2 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)) (* (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) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)) (pow y-scale 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) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* 1/2 (PI)) (pow x-scale 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (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)) (/ (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))) (+ (* 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 (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))) (* 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)) (/ (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)) (/ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (* (sqrt 8) (sqrt (+ (* 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)))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))) (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))) (sin (* 1/2 (PI))))
79.0ms
x-scale
@-inf
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* y-scale (sqrt 8)) y-scale (sqrt 8) 8 (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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)))) 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow b 2) b (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/180 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))) (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))) (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))) x-scale (* (PI) (* (sqrt 2) (sqrt 8))) (* (sqrt 2) (sqrt 8)) (sqrt 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) (* y-scale (pow 8 1/2)) (pow 8 1/2) 1/2 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)) (* (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) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)) (pow y-scale 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) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* 1/2 (PI)) (pow x-scale 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (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)) (/ (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))) (+ (* 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 (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))) (* 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)) (/ (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)) (/ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (* (sqrt 8) (sqrt (+ (* 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)))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))) (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))) (sin (* 1/2 (PI))))
61.0ms
y-scale
@inf
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* y-scale (sqrt 8)) y-scale (sqrt 8) 8 (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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)))) 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow b 2) b (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/180 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))) (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))) (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))) x-scale (* (PI) (* (sqrt 2) (sqrt 8))) (* (sqrt 2) (sqrt 8)) (sqrt 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) (* y-scale (pow 8 1/2)) (pow 8 1/2) 1/2 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)) (* (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) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)) (pow y-scale 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) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* 1/2 (PI)) (pow x-scale 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (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)) (/ (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))) (+ (* 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 (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))) (* 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)) (/ (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)) (/ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (* (sqrt 8) (sqrt (+ (* 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)))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))) (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))) (sin (* 1/2 (PI))))
61.0ms
x-scale
@inf
((/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* y-scale (sqrt 8)) y-scale (sqrt 8) 8 (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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)))) 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2) a (pow (sin (* 1/180 (* angle (PI)))) 2) (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow b 2) b (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/180 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))) (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))) (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))) x-scale (* (PI) (* (sqrt 2) (sqrt 8))) (* (sqrt 2) (sqrt 8)) (sqrt 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (* b (* x-scale (* y-scale (pow 8 1/2)))) (* x-scale (* y-scale (pow 8 1/2))) (* y-scale (pow 8 1/2)) (pow 8 1/2) 1/2 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)) (* (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) (* x-scale x-scale) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)) (pow y-scale 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) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) (* 1/2 (PI)) (pow x-scale 2) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (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)) (/ (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))) (+ (* 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 (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))) (* 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)) (/ (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)) (/ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (* (sqrt 8) (sqrt (+ (* 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)))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))) (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))) (sin (* 1/2 (PI))))

rewrite2.3s (2.5%)

Memory
3.3MiB live, 3 107.6MiB allocated; 1.7s collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06579435687
06754363337
09575355673
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
907 → 1 010
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)))))))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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))))))))
#s(literal 1/4 binary64)
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)))))))
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
y-scale
(sqrt.f64 #s(literal 8 binary64))
#s(literal 8 binary64)
(sqrt.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))))))
(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)))))
#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
(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/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(*.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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 b #s(literal 2 binary64))
b
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))
(*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
(*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
(*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
(*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
x-scale
(*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64))))
(*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))
(*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))
(*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))
(*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))
(pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(pow.f64 (+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64))
(+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 4 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 4 binary64)
(*.f64 (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #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 x-scale x-scale)
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 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 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 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 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))
(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))
(pow.f64 x-scale #s(literal 2 binary64))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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)))))
(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))))
(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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 2 binary64)) (pow.f64 (sin.f64 (fma.f64 #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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (pow.f64 (sin.f64 (*.f64 #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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
(*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))
(*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
(*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) 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) (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))) (sqrt (/ 1 (+ (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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow a 2) (+ (* 1/4 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 5) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 5) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow b 3) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 5) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) a)))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* (pow a 2) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (pow a 2))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* (pow a 2) (* y-scale (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow a 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* (pow a 2) (+ (* y-scale (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))) (* (pow a 2) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 3) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* b (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* (pow a 2) (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (+ (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow b 3) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 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))) (* 1/2 (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow b 3) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow a 2) (+ (* 1/4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (pow a 2) (+ (* -1/8 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow a 2) (+ (* (pow a 2) (+ (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)) (* (pow b 3) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 5) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* a (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (pow a 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))) (pow a 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 6)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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))))))) (* 1/4 (/ (pow (+ (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 4)) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 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)))) (* 2 (* (- (/ (* (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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 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))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))) (pow a 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))) (pow a 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow a 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow b 6) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* -1/8 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))) (pow a 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow b 4) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/8 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* a (+ (* -1/2 (/ (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* (pow a 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (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 (cos (* 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -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 (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (/ (* (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (- (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (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 (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 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow b 2) (+ (* 1/4 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* a (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 6)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (pow b 2) #s(hole binary64 (pow b 2)))
#s(approx b #s(hole binary64 b))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/180 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))) #s(hole binary64 (* 1/180 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) #s(hole binary64 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* b (* x-scale (* y-scale (pow 8 1/2)))) #s(hole binary64 (* b (* x-scale (* y-scale (sqrt 8))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* (pow b 2) (* y-scale (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))) (* (pow b 2) (+ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* (pow b 2) (+ (* y-scale (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))) (* (pow b 2) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 3) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* a (* (pow y-scale 2) (sin (* 1/180 (* angle (PI))))))))))) (* (pow b 2) (+ (* 1/8 (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))) (* 1/2 (/ (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)) (* (pow a 8) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))))) (* (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) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow a 3) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* -1/8 (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2)))))) (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 3) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2)))))))))) (* 1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8)) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow b 2) (+ (* 1/4 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (pow b 2) (+ (* -1/8 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/8 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8))) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8))) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* a (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow b 2) (+ (* (pow b 2) (+ (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (sqrt 8)) (* (pow a 3) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (* 1/2 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (sqrt 8))) (* (pow a 5) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))))) (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (sqrt 8)) (* a (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))) #s(hole binary64 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* b (+ (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* b (+ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* b (+ (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2))) (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow b 2) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) a) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (/ (* a (* x-scale (* y-scale (sqrt 8)))) (pow b 2)) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow b 2) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/2 (* (+ (* -8 (/ (* (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)))) (* 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))) (- (/ (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)))))) (sqrt (/ 1 (+ (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (pow a 2)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (/ (* x-scale (* y-scale (sqrt 8))) (pow b 2)) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (pow b 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))) (pow b 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 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 (cos (* 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)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -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)))))) (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 (/ (* (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 6)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/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)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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))))))) (* 1/4 (/ (pow (+ (* 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))))) (pow b 4)) (sqrt (/ 1 (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1/4 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1 (* b (+ (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* b (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8)))) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8)))) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (/ (* (pow a 2) (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8)))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* b (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* b (+ (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (pow (sin (* 1/180 (* angle (PI)))) 6)) (* (pow b 6) (* (pow (cos (* 1/180 (* angle (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* b (+ (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (+ (/ (* y-scale (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3)))) (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))) (pow b 4)) (+ (/ (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))))))) (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5)))))) (pow b 6)) (/ (* y-scale (+ (* 1/8 (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow b 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2)))) (* 1/2 (/ (* (pow a 6) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))))) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3)))) (* -1/8 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2)))))))) (pow b 6))) (+ (* 1/8 (/ (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/2 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/16 (/ (* (pow a 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 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))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))) (* (pow y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow b 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 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 a 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow y-scale 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow b 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/8 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/8 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* -1 (* b (+ (* -1/2 (/ (* (pow a 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (sqrt 8))) (* (pow b 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (pow (sqrt 2) 3))))) (+ (* 1/2 (/ (* (pow a 6) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (sqrt 8))) (* (pow b 6) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 5) (pow (sqrt 2) 5))))) (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (sqrt 8))) (* (pow b 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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)))))))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* 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/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/32400 (/ (* (pow a 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/32400 (/ (* (pow b 2) (pow (PI) 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))))))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* 1/2 (/ (* (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))))) (* b (sqrt 2)))) (* b (* y-scale (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* b (* y-scale (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))) (* b (sqrt 2)))) (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (+ (* b (* y-scale (* (sqrt 2) (sqrt 8)))) (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2))))))) (* b (sqrt 2)))) (* 1/2 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* 1/2 (/ (* (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (* b (sqrt 2))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* b (sqrt 2)))) (* b (sqrt 2)))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))) (* b (sqrt 2)))) (* 1/2 (/ (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) (* b (sqrt 2)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (+ (* b (sqrt 2)) (* (pow angle 2) (+ (* 1/2 (/ (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* 1/2 (/ (* (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))) (* (pow b 2) (pow (sqrt 2) 2)))))) (* b (sqrt 2)))) (* 1/2 (/ (- (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))) 2) (* (pow b 2) (pow (sqrt 2) 2))))) (* b (sqrt 2)))))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (+ (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (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 (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 (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 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* -1/16200 (* (pow angle 2) (* (pow b 2) (pow (PI) 2)))) (* 2 (pow b 2)))))
#s(approx (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 2 (* (pow angle 2) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))
#s(approx (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (pow b 2)))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ (* -1/32400 (* (pow angle 2) (* (pow b 2) (pow (PI) 2)))) (pow b 2))))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (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 2) (pow (cos (* 1/180 (* angle (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 (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 1))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 1))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* 1/180 (* angle (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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/8 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))) (* angle (+ (* 1/360 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/90 (/ (* angle (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))))) (sqrt 2))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/2 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* y-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* b (* y-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* 1/180 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* b (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8))))))) (* 1/180 (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* angle (+ (* 1/180 (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/34992000 (* b (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* 1/22674816000000 (* (pow angle 2) (* b (* x-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8)))))))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) #s(hole binary64 (* angle (+ (* 1/180 (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/34992000 (* b (* x-scale (* (pow (PI) 3) (* (sqrt 2) (sqrt 8)))))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* b (* x-scale (* (pow (PI) 7) (* (sqrt 2) (sqrt 8))))))) (* 1/22674816000000 (* b (* x-scale (* (pow (PI) 5) (* (sqrt 2) (sqrt 8))))))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (cos (* 1/2 (PI))))) (* x-scale (sqrt 2)))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* x-scale (sqrt 2)))) (* 1/2 (/ (* angle (* x-scale (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* x-scale (sqrt 2)))) (* angle (+ (* 1/2 (/ (* angle (* x-scale (- (+ (* -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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* x-scale (- (+ (* -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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) x-scale))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 2 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 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))) (* 1/2 (/ (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI))))))) (pow (sin (* 1/2 (PI))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* 1/2 (/ (* angle (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (pow (sin (* 1/2 (PI))) 2))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow x-scale 2))) (* angle (+ (* 1/2 (/ (* angle (* (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)))) (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2))))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))) (sin (* 1/2 (PI)))))))) (pow (sin (* 1/2 (PI))) 2))) (* 1/2 (/ (* (pow x-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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))) (pow (sin (* 1/2 (PI))) 2))))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2)))))))) (/ (pow (sin (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 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 x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))) (* angle (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (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 (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow x-scale 2)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2)))))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (/ (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)))) (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))))) #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3)))) (pow x-scale 4))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (pow (sin (* 1/2 (PI))) 3))) (pow x-scale 4))) (* angle (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2))) (pow x-scale 4))) (+ (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))) (pow x-scale 2))) (* angle (+ (* 1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (+ (* -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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))))))) (pow x-scale 2))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -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 x-scale 2)))))))))) (/ (pow (sin (* 1/2 (PI))) 4) (pow x-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 (/ (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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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)))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-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))))))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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))) (* 1/32400 (/ (pow (PI) 2) (pow y-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)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-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 (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))))
#s(approx (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) #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 (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) #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))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2)))))
#s(approx (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) #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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow y-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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) #s(hole binary64 (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) #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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) #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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) #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 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow x-scale 2))))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) #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 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) #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 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) #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 (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 (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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))))) (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))) (* angle (+ (* a (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* a (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))) (* angle (+ (* a (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))))) (* angle (+ (* a (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sin (* 1/2 (PI)))))) (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2)))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sin (* 1/2 (PI))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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)))))))) (* (pow a 2) (sin (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/2 (PI))) 2)) (pow x-scale 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4)))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow y-scale 4) (* (PI) (* (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))) 5))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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)))))) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 4))) (+ (* 1/129600 (/ (* (pow y-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2)))) (* 1/4 (/ (* (pow y-scale 4) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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))) 4))))) (+ (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/2 (+ (* -2/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2))) (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow x-scale 2)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* x-scale (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/2 (+ (* 1/2025 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow x-scale 2))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))) (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))))))))) (* (pow a 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2))))) (/ (* x-scale (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1/90 (/ (* (pow y-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/4050 (/ (* (pow b 2) (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 y-scale 2))) (+ (* -1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (* (pow (cos (* 1/2 (PI))) 2) (pow (sin (* 1/2 (PI))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (pow (sin (* 1/2 (PI))) 3))) (+ (* 1/45 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (pow (sin (* 1/2 (PI))) 5) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))))) (* (pow x-scale 2) (pow y-scale 4)))) (+ (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 6) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8))))) (sin (* 1/2 (PI))))) (+ (* -1/45 (/ (* (pow y-scale 8) (* (PI) (* (cos (* 1/2 (PI))) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 9))) (+ (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/2025 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (+ (* 1/8100 (/ (* (pow y-scale 4) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sin (* 1/2 (PI))) 6))) (/ (* (pow y-scale 8) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/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))) 8)))))) (sin (* 1/2 (PI))))) (/ (* (pow y-scale 8) (+ (* -1/45 (/ (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))) (+ (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow 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))) 8))))))) (* (pow x-scale 2) (pow y-scale 4))) (/ (* (pow y-scale 2) (+ (* -1/364500 (/ (* (pow b 2) (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (+ (* -1 (/ (* (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 x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2))) (* -1/17496000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))) (pow y-scale 2)))))) (pow x-scale 2))) (+ (* -1/90 (/ (* (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 y-scale 2))) (* 1/90 (/ (* (pow b 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 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))))))))) (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 a 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/360 (/ (* angle (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* 1/90 (/ (* angle (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/2 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* x-scale (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/5832000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 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/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* x-scale (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (+ (* 1/90 (/ (* angle (* (PI) (cos (* 1/2 (PI))))) (* y-scale (sqrt 2)))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* y-scale (sqrt 2)))) (* 1/2 (/ (* 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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (PI) (cos (* 1/2 (PI)))) (* y-scale (sqrt 2)))) (* angle (+ (* 1/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))))) (* 1/90 (/ (* (PI) (* (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)))))) (* 1/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (sqrt 2)))) (* 1/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/8100 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (* (pow y-scale 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (/ (* (sin (* 1/2 (PI))) (sqrt 2)) y-scale))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (+ (* 1/45 (/ (* angle (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (pow y-scale 2))) (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/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 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (+ (* 2 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))) (* angle (+ (* 1/45 (/ (* (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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* -1/32400 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2)) (pow y-scale 2)))))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (sin (* 1/2 (PI))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (sin (* 1/2 (PI))) 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))))))))))))))))
#s(approx (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(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))))
#s(approx (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(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 (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(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 (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(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 (/ (* (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(hole binary64 (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4))))
#s(approx (+ (* 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(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 (/ (* (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(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 (/ (* (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(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 (/ (* (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(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 (/ (* (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(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 (/ (* (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(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 (/ (* (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(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 (* (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 (- (/ (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(hole binary64 (/ (pow (sin (* 1/2 (PI))) 4) (pow y-scale 4))))
#s(approx (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(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 (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(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 (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(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 (- (/ (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(hole binary64 (* -1 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (- (/ (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(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 (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(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 (- (/ (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(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 (/ (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 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) #s(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) #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 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) #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 (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(hole binary64 (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2))))
#s(approx (+ (/ (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(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 (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(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))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (/ (pow (sin (* 1/2 (PI))) 2) (pow y-scale 2)))))
#s(approx (+ (/ (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(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))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (+ (* angle (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* angle (+ (* angle (+ (* angle (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))) (* y-scale (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* y-scale (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))))) (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2)))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))) (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (+ (* 1/8 (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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)))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI))))))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* angle (+ (* 1/8 (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1 (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (* (pow a 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4))))))) (sin (* 1/2 (PI))))) (+ (* -1/360 (/ (* (pow x-scale 4) (* (PI) (* (cos (* 1/2 (PI))) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 5)))) (+ (* 1/360 (/ (* (PI) (* (cos (* 1/2 (PI))) (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 1/2) 2)))) (* 1/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 b 2) (pow (sin (* 1/2 (PI))) 4))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* b (* (sin (* 1/2 (PI))) (* (sqrt 8) (* (+ (* -1/16200 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 4)))) (+ (* 1/129600 (/ (* (pow x-scale 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow b 2) (* (pow (sin (* 1/2 (PI))) 4) (pow (sqrt 1/2) 2))))) (* 1/4 (/ (* (pow x-scale 4) (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/2 (PI))) 4)))))) (+ (* 1/90 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* 1/2 (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))))) (* (pow y-scale 2) (sqrt 1/2)))) (+ (* -1/360 (/ (* (pow x-scale 2) (* (PI) (* (cos (* 1/2 (PI))) (* (sqrt 8) (+ (* 1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 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))))))))))) (* b (* (pow y-scale 2) (* (pow (sin (* 1/2 (PI))) 2) (sqrt 1/2)))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (- (/ (* (pow x-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 x-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 x-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 x-scale 2)))))) (* 1/729000 (/ (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (* (sin (* 1/2 (PI))) (pow (- (pow b 2) (pow a 2)) 2)))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (* (pow a 2) (+ (* -1/5832000 (* (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 x-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 x-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 x-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 x-scale 2))))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (sin (* 1/2 (PI))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))) (+ (* -2 (/ (* (pow a 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow b 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))) (* 1/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (* -2/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))) (sin (* 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/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))) (* -1/45 (* (pow a 2) (* (PI) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI))))))))) (* (pow b 2) (pow (sin (* 1/2 (PI))) 2))))))) (* (pow a 2) (+ (* -1/5832000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))) (* -1/17496000 (* (pow (PI) 3) (* (cos (* 1/2 (PI))) (sin (* 1/2 (PI)))))))))))) (* b (* (pow y-scale 2) (sin (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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/90 (/ (* (PI) (* (cos (* 1/2 (PI))) (- (+ (* 1/16200 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 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))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (* (pow x-scale 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/360 (/ (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/8 (/ (* angle (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/4 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))) (* angle (+ (* 1/360 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/8 (/ (* angle (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/8 (/ (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* 1/90 (/ (* angle (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8))))) (sqrt 2))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* 1/2 (/ (* angle (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (+ (* angle (+ (* 1/90 (/ (* b (* (PI) (* (cos (* 1/2 (PI))) (sqrt 8)))) (sqrt 2))) (* angle (+ (* 1/2 (/ (* angle (* (sqrt 8) (- (* 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))) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2)))))) (* (sin (* 1/2 (PI))) (pow (sqrt 2) 2))))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))) (* 1/2 (/ (* (sqrt 8) (- (+ (* 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))))))) (* 1/8100 (/ (* (pow b 2) (* (pow (PI) 2) (pow (cos (* 1/2 (PI))) 2))) (pow (sqrt 2) 2))))) (* b (* (sin (* 1/2 (PI))) (sqrt 2))))))))) (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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 (cos (* 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)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) #s(hole binary64 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) #s(hole binary64 (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 2) #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 (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 2)))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (sqrt (+ (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)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 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)))) (* 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))) (/ (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)))) (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))))) #s(hole binary64 (pow (sin (* 1/180 (* angle (PI)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (- (/ (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 (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))
#s(approx (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 y-scale 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 y-scale 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 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 (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/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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))) (+ (/ (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 (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(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 (/ (* (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(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 (/ (* (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(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 (* (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 (- (/ (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(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 (- (/ (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(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 (/ (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 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))
#s(approx (+ (/ (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(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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (* (sqrt 8) (sqrt (+ (* 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(hole binary64 (* (sqrt 8) (sqrt (+ (* 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 (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))) #s(hole binary64 (* -1 (* angle (+ (* -1/2 (/ (PI) angle)) (* -1/180 (PI)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ (* 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 a 2) (pow (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 (/ 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) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* 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))))) (* 1/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -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 (cos (* 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 (/ (* (+ (* 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 a 2) (pow (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 (cos (* 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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 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)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* b (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* y-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* b (* y-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))) #s(hole binary64 (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* x-scale (* y-scale (pow 8 1/2))) #s(hole binary64 (* x-scale (* y-scale (sqrt 8)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -1/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)))) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))) x-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (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))) (* 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 y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (* 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 y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (* 1/180 (* angle (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))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 4)) (pow y-scale 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (/ (+ (* -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))) (* 1/2 (PI)))) 4)) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 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)))) 4)) (pow y-scale 4)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-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 (/ (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)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))
#s(approx (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (/ (+ (/ (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (* (pow x-scale 2) (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (* (pow x-scale 2) (+ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (* (pow x-scale 2) (+ (* a (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* y-scale (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* y-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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))) (* 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)))) 8))) (* 1/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 y-scale 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 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)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* y-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 4))))) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* y-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* 1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))) (pow y-scale 4))) (* -1/2 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* 1/4 (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 4 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 6))))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (pow y-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 8))))))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/4 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (* (sqrt 8) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* x-scale (* y-scale (sqrt 8))) #s(hole binary64 (* x-scale (* y-scale (sqrt 8)))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* 1/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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) x-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) x-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow x-scale 2) (+ (* 1/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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (* -1/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)))) (- (/ (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 (/ (* (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 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))) (* 1/4 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 2) (pow y-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))) x-scale)))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (pow x-scale 2))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (pow x-scale 2))))
#s(approx (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(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (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(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 (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(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 (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(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 (/ (* (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(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))
#s(approx (+ (* 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(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 (/ (* (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(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 (* (pow x-scale 2) (pow y-scale 2)) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#s(approx (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(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow x-scale 4))))
#s(approx (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(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 (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(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 (- (/ (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(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (- (/ (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(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 (+ (/ (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(hole binary64 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(approx (+ (/ (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(hole binary64 (/ (+ (/ (* (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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (sqrt 8) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #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))) (* (pow x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) y-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 2 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 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 6) (pow (sin (* 1/180 (* angle (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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 2)))) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (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 x-scale 6) (pow (sin (* 1/180 (* angle (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)))) 2)))) (+ (* 1/2 (/ (* (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 x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (* 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 y-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 y-scale 4)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow x-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 (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (pow (sin (* 1/180 (* angle (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 y-scale 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 y-scale 2))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* x-scale (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* x-scale (+ (* a (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 6)) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))) (+ (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* x-scale (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* x-scale (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale)))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #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))) (* (pow x-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* y-scale (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) y-scale))))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (* 2 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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)))) (+ (* 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 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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)))) (+ (* 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 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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)))) (+ (* 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 (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(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))
#s(approx (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(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 (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(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 (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(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 (/ (* (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(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4))))
#s(approx (+ (* 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(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 (/ (* (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(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 (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(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow y-scale 4))))
#s(approx (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(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 (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(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 (- (/ (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(hole binary64 (* -1 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))
#s(approx (+ (/ (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(hole binary64 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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))))) y-scale) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (/ (* y-scale (sqrt 8)) (pow x-scale 2)) (sqrt (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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)))))))) (* 1/4 (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* x-scale (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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)))) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 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 a 2) (pow (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 (/ (pow (+ (* 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)))) 2) (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* b (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 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)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (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)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow x-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* x-scale (+ (* a (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 6)) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))) (pow x-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (PI)))) (sqrt 2)))))) (pow x-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (+ (* -1/16 (/ (* (pow y-scale 8) (* (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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 (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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/16 (/ (* (pow y-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 10))) (* 1/8 (/ (* (pow y-scale 2) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 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))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow y-scale 6) (* (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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow y-scale 12) (* (pow (sin (* 1/180 (* angle (PI)))) 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)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (* 1/2 (/ (* (pow y-scale 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)))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))))))) (pow y-scale 6))) (* -1/2 (/ (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow y-scale 2)))))) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))) (pow y-scale 2)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (pow x-scale 6))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (* (pow y-scale 6) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow y-scale 6) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 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)))) 6))))))))) (* (pow a 2) (* (pow y-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow y-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (+ (* 1/4 (/ (* (pow y-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 12))) (/ (* (pow y-scale 8) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))) (pow y-scale 6))) (+ (* -1/2 (/ (* (pow y-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow y-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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)))) 6))) (* 2 (* (pow b 2) (* (pow y-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (pow x-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* (pow y-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (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 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 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (* -1 (/ (* (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (pow x-scale 2))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1/4 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -1 (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 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)) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (pow (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow x-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)))))) y-scale) (sqrt (/ 1 (+ (* 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/4 (* (/ (* y-scale (sqrt 8)) (pow x-scale 2)) (sqrt (+ (* 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))))))) (* -1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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))))) y-scale) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* (pow x-scale 2) (+ (* -1/4 (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* 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))))))) (* -1/8 (* (/ (* (sqrt 8) (+ (* 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)))) 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)) (sqrt (/ 1 (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 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)))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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)))) (- (* 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/4 (/ (pow (+ (* 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)))) 2) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (sqrt (/ 1 (+ (* 2 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))))
#s(approx (* y-scale (sqrt 8)) #s(hole binary64 (* y-scale (sqrt 8))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (+ (* 1/4 (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* b (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/8 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (+ (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* b (* x-scale (* (sqrt 8) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* y-scale (pow 8 1/2)) #s(hole binary64 (* y-scale (sqrt 8))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* 1/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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (/ (+ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/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))) (* 1/2 (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)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (pow (+ (* 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)))) 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))) y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (/ (+ (* 2 (pow (sin (* 1/180 (* angle (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 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 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)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (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)))) 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (* 1/2 (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)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (- (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (* 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))) 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))) (* 1/2 (PI)))) 4)) (pow x-scale 4))))) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4))))
#s(approx (* y-scale y-scale) #s(hole binary64 (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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (/ (+ (* -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)))) 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 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))) (* 1/2 (PI)))) 4)) (pow x-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))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) #s(hole binary64 (/ (- (/ (* (pow y-scale 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) #s(hole binary64 (/ (+ (/ (* (pow y-scale 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 (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) #s(hole binary64 (/ (+ (/ (* (pow y-scale 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 (pow y-scale 2) #s(hole binary64 (pow y-scale 2)))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2))))))) (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow y-scale 2) (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (+ (* a (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))) (* (pow y-scale 2) (+ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))))) (* (pow y-scale 2) (+ (* a (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* 1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 1/2) (sqrt 8))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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)))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/8 (/ (* x-scale (* (sqrt 8) (* (+ (* 1/2 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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)))))) (* (pow a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4)))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))))))))) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* x-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))) (+ (* -1/16 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) 10))) (+ (* -1/16 (/ (* (+ (* 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)))) 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/8 (/ (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (/ (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sqrt 1/2) 2)))))))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/2 (/ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6))) (+ (* 1/64 (/ (pow (+ (* 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))) (* 1/2 (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (- (/ (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 (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))))))) (* 2 (/ (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 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 b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* x-scale (* (sqrt 8) (* (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))) (+ (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (* 2 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 4))))) (+ (* 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 a 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* x-scale (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)))) (* 1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (* (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8)))))))))))))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))))) (pow x-scale 4))) (* -1/2 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* 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 x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4))) (+ (* 1/4 (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4) (pow (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow x-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 8))))))))))))) (* (pow a 2) (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI))))))))))) (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (+ (* 1/4 (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (+ (* x-scale (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (+ (* 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 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (* x-scale (* (sqrt 8) (- (* 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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (* -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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* 1/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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (PI)))) (sqrt 2)))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) y-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))) y-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (/ (+ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) (* (pow y-scale 2) (+ (* 1/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))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* (pow y-scale 2) (+ (* 1/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 (/ (* (+ (* 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 (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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))) (* 1/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 (+ (* 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))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))) y-scale)))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (/ (+ (* 2 (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (* (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 y-scale 2))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) #s(hole binary64 (/ (+ (* 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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2))))
#s(approx (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(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 (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(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 (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(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 (/ (* (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(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 (/ (* (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(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 (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(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 (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(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 (- (/ (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(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 (+ (/ (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(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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) y-scale) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* (pow y-scale 2) (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) y-scale)))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (/ (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)))))) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* (pow y-scale 2) (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))) (pow y-scale 2))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* 1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (/ (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)) x-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 1/2 (PI)))) 2)))) (+ (* 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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 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 (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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)))) 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))) (* 1/2 (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (+ (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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) (* 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))) (* 1/2 (PI)))) 4)))))) (* (pow y-scale 6) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (* 1/2 (PI)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (* (pow y-scale 4) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (+ (* -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 x-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 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* a (* y-scale (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* y-scale (+ (* a (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 6)) (+ (/ (* a (+ (* 1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* 1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* 1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (+ (* 1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* 1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* y-scale (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* 1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* y-scale (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))))))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale)))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* 1/2 (/ (* x-scale (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2)))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (/ (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)) x-scale))))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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)))) (+ (* 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 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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)))) (+ (* 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 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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)))) (+ (* 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 (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(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 (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(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 (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(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 (/ (* (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(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 (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(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 (- (/ (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(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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (pow y-scale 2)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 (+ (/ (* (pow a 2) (pow (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 (/ (* (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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)))))))) (+ (* 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))))))))) (pow y-scale 6)) (sqrt (/ 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)))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 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 a 2) (pow (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/4 (/ (pow (+ (* 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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) 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))))))))) (pow y-scale 4)) (sqrt (/ 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)))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/8 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (* (sqrt 2) (sqrt 8))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 y-scale 2) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* -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)))) 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))) (* 1/2 (PI)))) 4)))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 6) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (* -1/2 (/ (* b (* (pow x-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (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))) (* 1/2 (PI)))) 4))))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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)) 2)) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow (sqrt 2) 2)))))))) (* (pow y-scale 4) (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* a (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* a (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 6)) (+ (/ (* a (+ (* -1/8 (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 4)) (/ (* a (+ (* -1/8 (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)))) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))) (pow y-scale 2)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/4 (/ (* (pow b 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 1/2) (sqrt 8)))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* -1/16 (/ (* (pow x-scale 8) (* (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (* 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 (sin (* 1/180 (* angle (PI)))) 8))) (+ (* -1/16 (/ (* (pow x-scale 10) (* (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 10))) (* 1/8 (/ (* (pow x-scale 2) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 1/2) 2))))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/2 (/ (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 8) (* (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sqrt 1/2)))) (+ (* -1/16 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow x-scale 6) (* (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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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))) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (+ (* -1 (/ (* (pow x-scale 12) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) 12))) (* 1/2 (/ (* (pow x-scale 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)))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow x-scale 6))) (* -1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8)))))) (pow x-scale 2)))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI)))))))))) (pow y-scale 6))) (+ (* -1/8 (/ (+ (* -1 (/ (* (pow b 2) (* (sin (* 1/180 (* angle (PI)))) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* -1/8 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (pow (sin (* 1/180 (* angle (PI)))) 6))) (+ (* 1/64 (/ (* (pow x-scale 6) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 6) (pow (sqrt 1/2) 2)))) (* 1/8 (/ (* (pow x-scale 6) (- (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 (sin (* 1/180 (* angle (PI)))) 6))))))))) (* (pow a 2) (* (pow x-scale 2) (sqrt 1/2))))) (+ (* -1/8 (/ (* (pow x-scale 4) (* (sqrt 8) (* (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (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 (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))) (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (* 1/2 (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* -1 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (+ (* -1 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (+ (* 1/4 (/ (* (pow x-scale 12) (pow (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 12))) (/ (* (pow x-scale 8) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow (sin (* 1/180 (* angle (PI)))) 8))))))) (pow x-scale 6))) (+ (* -1/2 (/ (* (pow x-scale 6) (* (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2)))))) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 2 (* (pow b 2) (* (pow x-scale 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))))))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))) (pow y-scale 4))) (* -1/8 (/ (+ (* -1/4 (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 1/2))))) (/ (* (pow x-scale 2) (* (sqrt 1/2) (* (sqrt 8) (+ (* 1/2 (+ (* -1 (/ (* (pow b 2) (* (pow x-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 x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 2) (+ (* -8 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2))) (pow x-scale 2))) (* 2 (+ (* -1 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* -1 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 4)) (pow x-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (sin (* 1/180 (* angle (PI))))))) (pow y-scale 2))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/8 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8)))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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 y-scale 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (+ (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* -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 (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2))) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 6) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))) (* -1/2 (/ (* (pow x-scale 2) (* (sqrt 8) (- (* 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 (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (sin (* 1/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)) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (sqrt 2) 2))))))) (* (pow y-scale 4) (* (sin (* 1/180 (* angle (PI)))) (sqrt 2))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* 1/2 (/ (* (pow x-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 x-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 x-scale 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)) (sqrt (/ 1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2)) (pow x-scale 2)))))))))))))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64))))
#s(literal 1/4 binary64)
(*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))
(*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))
y-scale
(pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 8 binary64))
(exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 binary64)))
#s(literal 8 binary64)
(pow.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)))))))) #s(literal 1/2 binary64))
(sqrt.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)))))))))
(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 (*.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))))))))
#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))))))
(pow.f64 (*.f64 a (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(*.f64 (fabs.f64 a) (fabs.f64 a))
(*.f64 (neg.f64 a) (neg.f64 a))
(*.f64 a a)
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
a
(*.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)))
(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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(pow.f64 (*.f64 b (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(*.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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (neg.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 (fabs.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fabs.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.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))))) (cos.f64 (+.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)))))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(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)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64))))))))))
(*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64)))))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64))))))
(*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64)))))
(*.f64 b (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64))))
(*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64)))
x-scale
(*.f64 (PI.f64) #s(literal 4 binary64))
#s(literal 4 binary64)
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))) #s(literal 1/2 binary64)))
(*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))
(*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))
(*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))
(pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 8 binary64))
(exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))))
(exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) #s(literal 1/2 binary64)))
(+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
(pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 binary64))
(sqrt.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))))
(exp.f64 (*.f64 (log.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) #s(literal 1/2 binary64)))
(fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))
(+.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))
#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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 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 (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 x-scale y-scale) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))
(*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (neg.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 (fabs.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (fabs.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.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))))) (cos.f64 (+.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)))))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(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)))))
(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))
(*.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 (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 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))
(*.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 (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 (neg.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (neg.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))
(*.f64 (fabs.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))) (fabs.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))
(*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))
(pow.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 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 2 binary64))
(exp.f64 (*.f64 (log.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 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 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.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 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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.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 y-scale y-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 x-scale 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 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))
(*.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 (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 (*.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 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)))))
(pow.f64 (sin.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)))))
(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))
(*.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)))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
(*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))
(pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))))
(+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))))
(pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale)))))
(+.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)))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-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 (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))
(pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 2 binary64))
(exp.f64 (*.f64 (log.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 2 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 y-scale y-scale)) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))
(-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-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 (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 (*.f64 y-scale y-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 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))
(+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale)))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))
(*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))
(*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))
(*.f64 b (*.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))) #s(literal 4 binary64))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 (cos.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 (sin.f64 (*.f64 #s(literal 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 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 (cos.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 (sin.f64 (*.f64 #s(literal 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 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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/8 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 -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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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))))))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 (cos.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 (sin.f64 (*.f64 #s(literal 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 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 a a) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 -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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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/8 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 -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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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))))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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/2 binary64) (/.f64 (*.f64 (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 -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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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))))))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (fma.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+.f64 (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 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 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (fma.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (/.f64 (*.f64 (sin.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (fma.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))))) (/.f64 (*.f64 (sin.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.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))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.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 (pow a 2) (*.f64 a a))
#s(approx a a)
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))))) a) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) a))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (*.f64 a a)))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.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 (*.f64 (*.f64 y-scale y-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/4 binary64) (*.f64 b (*.f64 (sin.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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.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 (*.f64 (*.f64 y-scale y-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/4 binary64) (*.f64 b (*.f64 (sin.f64 (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 a a) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.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))))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (*.f64 (*.f64 b b) b) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (*.f64 (*.f64 y-scale y-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/4 binary64) (/.f64 (*.f64 (*.f64 (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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.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 (*.f64 (*.f64 y-scale y-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/4 binary64) (*.f64 b (*.f64 (sin.f64 (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 a a) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.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))))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (*.f64 (*.f64 b b) b) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (*.f64 (*.f64 y-scale y-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/4 binary64) (/.f64 (*.f64 (*.f64 (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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 a a) (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 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/16 binary64) (/.f64 (*.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 b #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 6 binary64)) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.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))))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) b) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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))))) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (*.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 b (*.f64 (*.f64 y-scale 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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.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 (*.f64 (*.f64 y-scale y-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/4 binary64) (*.f64 b (*.f64 (sin.f64 (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 a a) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.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))))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (*.f64 (*.f64 b b) b) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (*.f64 (*.f64 y-scale y-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/4 binary64) (/.f64 (*.f64 (*.f64 (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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 a a) (+.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 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/16 binary64) (/.f64 (*.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 b #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 6 binary64)) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.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))))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) b) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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))))) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (*.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 b (*.f64 (*.f64 y-scale y-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 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 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/16 binary64) (/.f64 (*.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 b #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 6 binary64)) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (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 (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 (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/16 binary64) (/.f64 (*.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 b #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 6 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 (pow.f64 b #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)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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))))) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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))))) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (*.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 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 y-scale y-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 (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 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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))))) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (*.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 (*.f64 (*.f64 b b) b) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.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 (*.f64 (*.f64 y-scale y-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/4 binary64) (*.f64 b (*.f64 (sin.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/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.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 (*.f64 (*.f64 y-scale y-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 b (*.f64 (sin.f64 (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 a a) (fma.f64 #s(literal 1/8 binary64) (fma.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))))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (*.f64 (*.f64 b b) b) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (*.f64 (*.f64 y-scale y-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/4 binary64) (/.f64 (*.f64 (*.f64 (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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.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 (*.f64 (*.f64 y-scale y-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 b (*.f64 (sin.f64 (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 a a) (fma.f64 #s(literal 1/8 binary64) (fma.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))))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (*.f64 (*.f64 b b) b) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (*.f64 (*.f64 y-scale y-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 (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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 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/16 binary64) (/.f64 (*.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 b #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 6 binary64)) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.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))))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) b) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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))))) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (*.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 b (*.f64 (*.f64 y-scale 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/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.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 (*.f64 (*.f64 y-scale y-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 b (*.f64 (sin.f64 (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 a a) (fma.f64 #s(literal 1/8 binary64) (fma.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))))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (*.f64 (*.f64 b b) b) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (*.f64 (*.f64 y-scale y-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 (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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 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/16 binary64) (/.f64 (*.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 b #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 6 binary64)) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.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))))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) b) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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))))) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (*.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 b (*.f64 (*.f64 y-scale y-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) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 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/16 binary64) (/.f64 (*.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 b #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 6 binary64)) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (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 (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 (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/16 binary64) (/.f64 (*.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 b #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 6 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 (pow.f64 b #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)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.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 (*.f64 b b) (*.f64 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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))))) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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))))) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (*.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 (*.f64 (*.f64 b b) b) (*.f64 (*.f64 y-scale y-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 (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 (*.f64 x-scale x-scale) (*.f64 (*.f64 (sin.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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))))) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.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 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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)))))) (*.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 (*.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 (*.f64 (*.f64 b b) b) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.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 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (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 a a) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (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 a a) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.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 (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 b (*.f64 (sin.f64 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 b (*.f64 (sin.f64 (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 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (/.f64 (*.f64 (*.f64 (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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 b (*.f64 (sin.f64 (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 a a) (fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 5 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))))) (/.f64 (*.f64 (*.f64 (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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 a a)) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 a a)) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 -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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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 a #s(literal 4 binary64))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 a a)) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 -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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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))))))))) (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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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/2 binary64) (/.f64 (*.f64 (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (*.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 -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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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 a #s(literal 6 binary64))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 -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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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 a #s(literal 4 binary64))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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)))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (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 b b) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (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 b b) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (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 b b) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 a (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 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 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 a (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 a a)))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 a a) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 a a))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (fma.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))))) (*.f64 a a) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 a a)))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 a (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 a a)) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 a a)) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 -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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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 a #s(literal 4 binary64))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 a a)) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 -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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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))))))))) (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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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/2 binary64) (/.f64 (*.f64 (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (*.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 -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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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 a #s(literal 6 binary64))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 -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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))) (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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)))))) (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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 a #s(literal 4 binary64))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (cos.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (cos.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 (cos.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 (sin.f64 (*.f64 #s(literal 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))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (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 b b) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (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 b b) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (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 b b) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 a a))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (*.f64 a a) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 a a)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (fma.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))))) (*.f64 a a) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 a a))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.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 6 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #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))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (*.f64 (*.f64 (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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #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 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 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 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 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 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/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 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 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 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/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 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (-.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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))))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 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 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/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 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))))))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))))))) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (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 b b) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))))) (/.f64 (*.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 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 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (*.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))))))))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (pow b 2) (*.f64 b b))
#s(approx b b)
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* 1/180 (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64)))))))
#s(approx (* angle (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))))) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64))))))
#s(approx (* b (* x-scale (* (PI) (* (sqrt 2) (sqrt 8))))) (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64)))))
#s(approx (* b (* x-scale (* y-scale (pow 8 1/2)))) (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))) a) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) a) (*.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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (sin.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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) a) (*.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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (sin.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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 b b) (*.f64 y-scale (fma.f64 #s(literal -1/8 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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (pow.f64 a #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/16 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (sin.f64 (*.f64 #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) a) (*.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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (*.f64 a a) (*.f64 (sin.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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) a) (*.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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (sin.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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 b b) (+.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (pow.f64 a #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/16 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (sin.f64 (*.f64 #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) a) (*.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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (*.f64 a a) (*.f64 (sin.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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 (*.f64 b b) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (pow.f64 a #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/16 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/4 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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (pow.f64 a #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/16 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 6 binary64))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) a) (*.f64 (*.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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) a) (*.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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))))) (*.f64 #s(literal 1/8 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 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) a) (*.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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (sin.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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/4 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) a) (*.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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (sin.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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal 1/4 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (pow.f64 a #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/16 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (sin.f64 (*.f64 #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) a) (*.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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (*.f64 a a) (*.f64 (sin.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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) a) (*.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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (sin.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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal 1/4 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (pow.f64 a #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/16 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (sin.f64 (*.f64 #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) a) (*.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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (*.f64 a a) (*.f64 (sin.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 (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (pow.f64 a #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/16 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/4 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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (pow.f64 a #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/16 binary64) (/.f64 (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 a a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 6 binary64))) (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) a) (*.f64 (*.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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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)))))) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #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) a) (*.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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))))))) (*.f64 #s(literal 1/8 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 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (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 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/4 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/8 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 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b b) (fma.f64 (*.f64 b b) (fma.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 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 a #s(literal 5 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* b (* (sin (* 1/2 (PI))) (* (sqrt 2) (sqrt 8)))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))))) (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))))) (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))))) (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))))) (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 b (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 b (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 b (fma.f64 #s(literal -1/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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 b (fma.f64 #s(literal -1/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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 6 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))) a) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))))) a) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b b)) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 b b)) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 b (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/4 binary64) (*.f64 (sin.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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/4 binary64) (*.f64 (sin.f64 (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 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 b b)))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (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 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 b b))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/4 binary64) (*.f64 (sin.f64 (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 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (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 (fma.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 8 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))))) (*.f64 b b) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 b b)))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/4 binary64) (*.f64 (sin.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/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 b b)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 b b)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 8 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 b b)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (fma.f64 (sin.f64 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))))) (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (pow.f64 (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))))) (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -3 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))))) (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))))) (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale 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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #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 6 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 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 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/4 binary64) (*.f64 (sin.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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/4 binary64) (*.f64 (sin.f64 (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 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 b b))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (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 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 b b)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/4 binary64) (*.f64 (sin.f64 (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 y-scale (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (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 (fma.f64 (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 8 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))))) (*.f64 b b) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 b b))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/4 binary64) (*.f64 (sin.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/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 b b)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 b b)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-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/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.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))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 8 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))))) (pow.f64 b #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (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/16 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #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)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #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))))) (*.f64 (*.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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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) (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/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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 (fma.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (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 x-scale x-scale) (*.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 a a) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 b b)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.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 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.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 (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 (sin.f64 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (fma.f64 (sin.f64 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 5 binary64))))) (fma.f64 (sin.f64 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 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)) (fma.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 #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 #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 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #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/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 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.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 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)) (fma.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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))))))))) (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 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)) (fma.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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) #s(literal 2 binary64))))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 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)) (fma.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 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)) (fma.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (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 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.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))))) (pow.f64 (*.f64 x-scale 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)))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #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/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 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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 (/.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 (*.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 (fma.f64 (*.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 y-scale y-scale) (*.f64 (*.f64 x-scale x-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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.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 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)) (fma.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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 (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/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-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 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #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/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 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.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 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)) (fma.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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))))))))) (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 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)) (fma.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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) #s(literal 2 binary64))))))) (*.f64 (*.f64 b b) #s(literal 2 binary64))))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 #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 #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 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #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/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 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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 (fma.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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.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 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)) (fma.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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))))))))) (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 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)) (fma.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/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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) #s(literal 2 binary64)))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (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 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 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 b b) #s(literal 2 binary64)))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (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 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 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 b b) #s(literal 2 binary64))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.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))))) (*.f64 #s(literal 2 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 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (-.f64 (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 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 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 b b) #s(literal 2 binary64)))))) (*.f64 (*.f64 b b) #s(literal 2 binary64)))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale #s(literal 4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (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 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 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 b b) #s(literal 2 binary64)))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale #s(literal 4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (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 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 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 b b) #s(literal 2 binary64))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.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))))) (*.f64 #s(literal 2 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 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (-.f64 (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 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 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 b b) #s(literal 2 binary64)))))) (*.f64 (*.f64 b b) #s(literal 2 binary64)))))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (fma.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (-.f64 (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 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 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 b b) #s(literal 2 binary64)))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (fma.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.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 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 #s(literal 2 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 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (-.f64 (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 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 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 b b) #s(literal 2 binary64)))))) (*.f64 (*.f64 b b) #s(literal 2 binary64)))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 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 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/16200 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 b b) #s(literal 2 binary64))))) (*.f64 b (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (*.f64 #s(literal 2 binary64) (*.f64 b b)))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (fma.f64 #s(literal 2 binary64) (*.f64 b b) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (fma.f64 #s(literal 2 binary64) (*.f64 b b) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (+.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 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)))))))))))))
#s(approx (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (fma.f64 #s(literal 2 binary64) (*.f64 b b) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (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 #s(literal 2 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 (*.f64 angle angle) (fma.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))))) (*.f64 #s(literal 2 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))))))))))))))))
#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)))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.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 (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.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 (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.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 (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 (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (*.f64 #s(literal 2 binary64) (*.f64 b b)))
#s(approx (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 b b))))
#s(approx (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (fma.f64 #s(literal 2 binary64) (*.f64 b b) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.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)))))))))))
#s(approx (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (fma.f64 #s(literal 2 binary64) (*.f64 b b) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (*.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 #s(literal 2 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))))))))))))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (*.f64 b b))
#s(approx (* (pow b 2) (pow (cos (* 1/180 (* angle (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 2) (pow (cos (* 1/180 (* angle (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 2) (pow (cos (* 1/180 (* angle (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 (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) #s(literal 1 binary64))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (*.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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))
#s(approx (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (*.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/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.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))))))))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) #s(literal 1 binary64))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.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 (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (+.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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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 x-scale x-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 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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 x-scale x-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 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.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/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 x-scale x-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 x-scale x-scale))))) (*.f64 x-scale x-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 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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-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/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/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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 x-scale x-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 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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 x-scale x-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 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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 x-scale x-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 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.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/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 x-scale x-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 x-scale x-scale))))) (*.f64 x-scale x-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 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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-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/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/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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 x-scale x-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 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64)))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 x-scale (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 4 binary64))))) (*.f64 #s(literal 1/180 binary64) (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 b (*.f64 x-scale (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 4 binary64)))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 4 binary64)))))))))))
#s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 b (*.f64 x-scale (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 4 binary64)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (*.f64 angle angle) (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal 4 binary64))))) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 4 binary64))))))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x-scale (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 x-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 x-scale x-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 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x-scale (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 x-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 x-scale x-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 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.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/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 x-scale x-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 x-scale x-scale))))) (*.f64 x-scale x-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 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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-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/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/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-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 x-scale x-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 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale 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)))) (*.f64 x-scale x-scale))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.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 x-scale x-scale)) (*.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)))) (*.f64 x-scale x-scale)))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale 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)))) (*.f64 x-scale x-scale)) (*.f64 angle (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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 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)) (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 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale 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)))) (*.f64 x-scale x-scale)) (*.f64 angle (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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 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)) (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 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.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/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 x-scale x-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 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.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/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 x-scale x-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 x-scale x-scale))))) (*.f64 x-scale x-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 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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-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))))))))))))))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/.f64 (*.f64 (sin.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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 (sin.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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/2 binary64) (/.f64 (*.f64 angle (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.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 (*.f64 (sin.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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/2 binary64) (/.f64 (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (-.f64 (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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.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/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 x-scale x-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 x-scale x-scale))))) (*.f64 x-scale x-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 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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-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/2 binary64) (/.f64 (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.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 (*.f64 (sin.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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) (/.f64 (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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (PI.f64) (*.f64 (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))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (PI.f64) (*.f64 (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)))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 x-scale #s(literal 4 binary64))) (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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))))))) (/.f64 (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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (PI.f64) (*.f64 (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)))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 x-scale #s(literal 4 binary64))) (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))))) (pow.f64 (*.f64 x-scale y-scale) #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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.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/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 x-scale x-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 x-scale x-scale))))) (*.f64 x-scale x-scale))))))))))) (/.f64 (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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (*.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)))))) (pow.f64 (*.f64 x-scale 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 (*.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)))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.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 x-scale 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 (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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))))))))) (pow.f64 (*.f64 x-scale 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 (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (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))))))))) (pow.f64 (*.f64 x-scale 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 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))))))) (pow.f64 (*.f64 x-scale 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 (*.f64 (sin.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 (/ (* (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 (sin.f64 (fma.f64 #s(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 (sin.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 (/ (* (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 (sin.f64 (fma.f64 #s(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/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 (sin.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 (/ (* (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 (sin.f64 (fma.f64 #s(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 -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.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/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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/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 x-scale x-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 x-scale x-scale))))))))) (/.f64 (*.f64 (sin.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 (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (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 (* (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 (sin.f64 (fma.f64 #s(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 (* (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 (sin.f64 (fma.f64 #s(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 (* (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 (sin.f64 (fma.f64 #s(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 (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 (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (*.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 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale))))))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 y-scale y-scale)))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.f64 #s(literal 1/32400 binary64) (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.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 (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.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 (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (*.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 (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (/.f64 (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 (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (PI.f64) (*.f64 (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))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (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 (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (PI.f64) (*.f64 (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)))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale)))))) (/.f64 (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 (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (PI.f64) (*.f64 (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)))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 x-scale #s(literal 4 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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale)) (*.f64 angle (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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.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/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 x-scale x-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 x-scale x-scale))))) (*.f64 x-scale x-scale))))))))) (/.f64 (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 (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (sin.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 (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (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 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 (sin.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 (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (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 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (*.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 x-scale x-scale))))
#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))) (fma.f64 angle (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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (-.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 x-scale x-scale))) (+.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 x-scale x-scale))) (*.f64 angle (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 x-scale x-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 x-scale x-scale))))))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 x-scale x-scale))))
#s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (*.f64 (sin.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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 (sin.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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (fma.f64 angle (+.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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))) (*.f64 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)) (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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 x-scale x-scale))))
#s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (fma.f64 angle (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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 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)) (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 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 angle (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 x-scale x-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 x-scale x-scale)))))))))) (/.f64 (*.f64 (sin.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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (/.f64 (*.f64 (sin.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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 (sin.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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (fma.f64 angle (+.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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))) (*.f64 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)) (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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 x-scale x-scale))))
#s(approx (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (fma.f64 angle (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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 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)) (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 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 angle (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 x-scale x-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 x-scale x-scale)))))))))) (/.f64 (*.f64 (sin.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 (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (pow.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (*.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 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale))))))))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale))) (+.f64 (*.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/2777030065152000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 y-scale y-scale)))))))))))))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/.f64 (*.f64 (sin.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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 (sin.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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (fma.f64 angle (+.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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))) (*.f64 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 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 (sin.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))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (fma.f64 angle (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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale)) (*.f64 angle (+.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 x-scale x-scale))) (+.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 x-scale x-scale))) (*.f64 angle (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 x-scale x-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 x-scale x-scale))))))))) (/.f64 (*.f64 (sin.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))) (* 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 (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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale)))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.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 x-scale x-scale)))))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))) (*.f64 angle (fma.f64 a (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.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))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 4 binary64)))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.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 x-scale x-scale))))))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.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 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (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)))) (-.f64 (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 x-scale x-scale))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(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 (*.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 x-scale x-scale)))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale)))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.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 x-scale x-scale)))))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))) (*.f64 angle (fma.f64 a (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale)))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.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 x-scale x-scale)))))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 angle (fma.f64 a (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale))) (+.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 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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 5 binary64))) (fma.f64 #s(literal 1/360 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 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.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))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 #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 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.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))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 4 binary64)))))) (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.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 x-scale x-scale)))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.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 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (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)))) (-.f64 (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 x-scale x-scale))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(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 (*.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 x-scale x-scale))))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.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/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.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 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (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)))) (-.f64 (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 x-scale 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))))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (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)))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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 -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (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)))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (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 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 x-scale x-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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 x-scale x-scale))))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(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 (*.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 x-scale x-scale))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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)) (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 #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 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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)))))))) (*.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/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.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))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 4 binary64)))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.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 x-scale x-scale))))))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.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 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (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)))) (-.f64 (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 x-scale x-scale))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(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 (*.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 x-scale x-scale)))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale)))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.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 x-scale x-scale)))))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale)))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.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 x-scale x-scale)))))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.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))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 4 binary64)))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.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 x-scale x-scale))))))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.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 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (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)))) (-.f64 (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 x-scale x-scale))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(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 (*.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 x-scale x-scale)))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale)))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.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 x-scale x-scale)))))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.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))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 4 binary64)))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.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 x-scale x-scale))))))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.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 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (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)))) (-.f64 (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 x-scale x-scale))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(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 (*.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 x-scale x-scale)))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.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 x-scale x-scale))) (+.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 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 (sin.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)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 4 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 5 binary64))) (fma.f64 #s(literal 1/360 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 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.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))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 4 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 #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 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.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))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 4 binary64)))))) (+.f64 (*.f64 #s(literal 1/90 binary64) (/.f64 (*.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 x-scale x-scale))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/45 binary64) (/.f64 (*.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 x-scale x-scale)))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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/2 binary64) (fma.f64 #s(literal 1/2025 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.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 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (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)))) (-.f64 (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 x-scale x-scale))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(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 (*.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 x-scale x-scale))))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.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/4050 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.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 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (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)))) (-.f64 (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 x-scale 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))))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.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)))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 6 binary64)) (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)))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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 -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 9 binary64))) (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)))) (fma.f64 #s(literal -1/2025 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 6 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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)) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (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 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 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)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 8 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/364500 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 x-scale x-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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (/.f64 (*.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 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/90 binary64) (/.f64 (*.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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 x-scale x-scale))))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(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 (*.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 x-scale x-scale))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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)) (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 #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 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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)))))))) (*.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/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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)) (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 #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 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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)))))))) (*.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/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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)) (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 #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 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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)))))))) (*.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/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) y-scale))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 y-scale (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) y-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) y-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (PI.f64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 angle (fma.f64 #s(literal 1/2 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)) (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 #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 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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)))))))) (*.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/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 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)) (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) y-scale)))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) (*.f64 y-scale y-scale))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.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 y-scale y-scale)) (*.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)))) (*.f64 y-scale y-scale)))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) (*.f64 y-scale y-scale)) (*.f64 angle (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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 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 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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 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)))) (*.f64 y-scale y-scale)) (*.f64 angle (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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 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 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)) (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/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 -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 #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 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 (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))) (/.f64 (*.f64 (sin.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 (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))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.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 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 y-scale y-scale))))
#s(approx (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))) (fma.f64 angle (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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 (*.f64 (sin.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 (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))) (fma.f64 angle (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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.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 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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))))) (*.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #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 (*.f64 (sin.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 (+ (* 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)) (/.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 (/ (* (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)) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (*.f64 (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))))))) (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 (/ (* (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)) (fma.f64 angle (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 (*.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale 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 (/ (* (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)) (fma.f64 angle (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 (*.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 angle (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 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 2 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 (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 (/ (* (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))) (*.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)))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))
#s(approx (/ (* (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))) (*.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)))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.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 x-scale y-scale) #s(literal 2 binary64)))))))
#s(approx (/ (* (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))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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))))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))))))))))
#s(approx (/ (* (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))) (*.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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))))) (pow.f64 (*.f64 x-scale 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (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))))))))) (pow.f64 (*.f64 x-scale 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 (sin.f64 (fma.f64 #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 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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)))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))))))))))))
#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 (- (/ (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) (/.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 (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) (fma.f64 #s(literal 1/45 binary64) (/.f64 (*.f64 angle (*.f64 (PI.f64) (*.f64 (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))))))) (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 (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) (fma.f64 angle (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 (*.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (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 (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) (fma.f64 angle (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 (*.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 angle (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)) (*.f64 #s(literal 2 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 (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 (- (/ (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))) (*.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)))) (*.f64 y-scale y-scale))))
#s(approx (- (/ (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))) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.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 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 y-scale y-scale))))
#s(approx (- (/ (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))) (-.f64 (*.f64 angle (-.f64 (*.f64 angle (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.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/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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.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 y-scale y-scale))))
#s(approx (- (/ (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))) (-.f64 (*.f64 angle (-.f64 (*.f64 angle (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 angle (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/32400 binary64) (/.f64 (*.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/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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.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 y-scale y-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 (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (/.f64 (*.f64 (sin.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/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.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 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 y-scale y-scale))))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (fma.f64 angle (+.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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 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 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (sin.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/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)) (fma.f64 angle (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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 angle (+.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 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (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 (sin.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/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (/.f64 (*.f64 (sin.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/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.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 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 y-scale y-scale))))
#s(approx (+ (/ (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))) (fma.f64 angle (+.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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 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 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/32400 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))))) (/.f64 (*.f64 (sin.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/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (fma.f64 angle (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)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)) (*.f64 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 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 angle (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 (sin.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 (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 angle (*.f64 y-scale (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 b (*.f64 (*.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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/90 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 angle (fma.f64 angle (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.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/16200 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-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))))))))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/90 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 b (*.f64 (*.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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.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 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.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 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 a a) (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 x-scale x-scale) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.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 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 b b))) (*.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 (*.f64 #s(literal -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))))))) (*.f64 (*.f64 a a) (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 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 y-scale (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 b (*.f64 (*.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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/90 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 angle (fma.f64 angle (fma.f64 angle (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.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)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (pow.f64 (sin.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)) (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-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)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-scale))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/360 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 x-scale 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-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))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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)))))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-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))))))) (fma.f64 #s(literal 1/90 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.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 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.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 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 a a) (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 x-scale x-scale) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.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 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 b b))) (*.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 (*.f64 #s(literal -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))))))) (*.f64 (*.f64 a a) (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 b (*.f64 (*.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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 x-scale x-scale)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 a a) (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 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.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 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(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 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 x-scale x-scale))))) (*.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)))))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (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)))))))) (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 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.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 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.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 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 a a) (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 x-scale x-scale) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.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 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 b b))) (*.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 (*.f64 #s(literal -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 (*.f64 #s(literal -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (*.f64 a a) (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 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-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)))) (-.f64 (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.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/16200 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-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))))))))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/90 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 b (*.f64 (*.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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.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 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.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 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 a a) (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 x-scale x-scale) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.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 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 b b))) (*.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 (*.f64 #s(literal -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))))))) (*.f64 (*.f64 a a) (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 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 y-scale (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 b (*.f64 (*.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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/90 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 b (*.f64 (*.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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/90 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 b (*.f64 (*.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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/90 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.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/16200 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-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))))))))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/90 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 b (*.f64 (*.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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.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 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.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 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 a a) (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 x-scale x-scale) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.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 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 b b))) (*.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 (*.f64 #s(literal -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))))))) (*.f64 (*.f64 a a) (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 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 b (*.f64 (*.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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/90 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (*.f64 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.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/16200 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-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))))))))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/90 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (*.f64 b (*.f64 (*.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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.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 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.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 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 a a) (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 x-scale x-scale) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.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 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 b b))) (*.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 (*.f64 #s(literal -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))))))) (*.f64 (*.f64 a a) (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 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (*.f64 a a) (*.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)))) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (pow.f64 (sin.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)) (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-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)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-scale))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/360 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 x-scale 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-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))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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)))))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))))))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/129600 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-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))))))) (fma.f64 #s(literal 1/90 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.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 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.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 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 a a) (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 x-scale x-scale) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.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 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 b b))) (*.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 (*.f64 #s(literal -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))))))) (*.f64 (*.f64 a a) (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 b (*.f64 (*.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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 (*.f64 a a) (*.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/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 x-scale x-scale)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 a a) (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 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.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 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(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 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)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 x-scale x-scale))))) (*.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)))))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (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)))))))) (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 (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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)))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 (*.f64 a a) (*.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 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.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 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 a a) (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 x-scale x-scale) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.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 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 b b))) (*.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 (*.f64 #s(literal -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.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))))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (/.f64 (*.f64 (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.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 (*.f64 #s(literal -2/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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/45 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(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 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (*.f64 a a) (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 b (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-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)))) (-.f64 (fma.f64 #s(literal 1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.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 x-scale x-scale)))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.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 x-scale x-scale) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (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(literal 2 binary64)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))) (*.f64 angle (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.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 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/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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (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(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (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(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 angle (*.f64 b (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (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(literal 2 binary64)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (*.f64 b (*.f64 (PI.f64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) (*.f64 angle (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 angle (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (*.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 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/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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (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(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (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(literal 2 binary64))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.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))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 (-.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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale)))) (-.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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale)))))) #s(literal 1/2 binary64)) (+.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 (/.f64 (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/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)))))
#s(approx (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))))
#s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64))))
#s(approx (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow.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)))))))) #s(literal 1/2 binary64)))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (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)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))) #s(literal 1/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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale 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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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.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)))) (sin (* 1/180 (* angle (PI))))) (* 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)))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-scale))))
#s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.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 (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
#s(approx (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
#s(approx (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))
#s(approx (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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))) (* 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 (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/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64)))))
#s(approx (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.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))) #s(literal 1/2 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) (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))))
#s(approx (/ (* (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))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (- (/ (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) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale)))))
#s(approx (- (/ (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))) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-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)))) (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) (pow y-scale 2)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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(approx (+ (/ (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))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.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 (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)) (pow.f64 (pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 1/2 binary64)))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.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 (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)) (pow.f64 (pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 1/2 binary64))))))
#s(approx (* 1/4 (* (sqrt 8) (sqrt (+ (* 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))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (pow.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)))))))) #s(literal 1/2 binary64)))))
#s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (pow.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)))))))) #s(literal 1/2 binary64))))
#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 (+ (* 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))))) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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))))))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.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 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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (cos.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))) (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)))))))))))))) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale)))))) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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))))))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.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 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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (cos.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))) (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))))))))))))) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (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 #s(literal 1/2 binary64) (/.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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))))))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (cos.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 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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (cos.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))) (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)))))))))))) (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)))))))))))))) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.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)))) #s(literal 4 binary64)))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 b (*.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)))) #s(literal 4 binary64))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 b (*.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)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 b (*.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)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* x-scale (* (PI) (* (sqrt 2) (sqrt 8)))) (*.f64 x-scale (*.f64 (PI.f64) #s(literal 4 binary64))))
#s(approx x-scale x-scale)
#s(approx (* x-scale (* y-scale (pow 8 1/2))) (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))) x-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))) x-scale))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 2 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 x-scale x-scale))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.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 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.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 (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 (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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.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 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (*.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 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 (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/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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 (*.f64 x-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) (/.f64 (fma.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) (/.f64 (fma.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 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 x-scale x-scale) (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 (sin.f64 (fma.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 (* x-scale x-scale) (*.f64 x-scale x-scale))
#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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (sin.f64 (fma.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 (* (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (fma.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 y-scale y-scale)) (/.f64 (*.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 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 4 binary64))) (pow.f64 x-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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (+.f64 (/.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (/.f64 (+.f64 (/.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (* x-scale x-scale) (*.f64 x-scale x-scale))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (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 b b) (*.f64 y-scale (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 y-scale y-scale)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (sin.f64 (*.f64 #s(literal 1/180 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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (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 b b) (*.f64 y-scale (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (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 b b) (*.f64 y-scale (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 a (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 y-scale y-scale)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (sin.f64 (*.f64 #s(literal 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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 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 8 binary64))))))))) (fma.f64 #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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.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)))))) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 y-scale y-scale)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (sin.f64 (*.f64 #s(literal 1/180 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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (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 b b) (*.f64 y-scale (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 y-scale y-scale)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (sin.f64 (*.f64 #s(literal 1/180 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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 a (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 6 binary64)))) (*.f64 #s(literal 1/8 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))))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))))) (fma.f64 #s(literal -1/16 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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 8 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (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) (fma.f64 #s(literal -8 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 y-scale y-scale)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (sin.f64 (*.f64 #s(literal 1/180 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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 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 8 binary64))))))))) (fma.f64 #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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.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)))))) (pow.f64 y-scale #s(literal 4 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (+.f64 (*.f64 #s(literal -1 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 -1 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (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 4 binary64)) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))) (fma.f64 #s(literal -1 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 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 8 binary64)))))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 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 8 binary64)))))))))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 #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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 y-scale y-scale)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (sin.f64 (*.f64 #s(literal 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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 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 8 binary64))))))))) (fma.f64 #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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.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)))))) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (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 b b) (*.f64 y-scale (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.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 b b) (*.f64 y-scale (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 y-scale y-scale)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (sin.f64 (*.f64 #s(literal 1/180 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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.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 b b) (*.f64 y-scale (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 y-scale y-scale)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (sin.f64 (*.f64 #s(literal 1/180 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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 y-scale y-scale)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (sin.f64 (*.f64 #s(literal 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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 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 8 binary64))))))))) (fma.f64 #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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.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)))))) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.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 b b) (*.f64 y-scale (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 y-scale y-scale)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (sin.f64 (*.f64 #s(literal 1/180 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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 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 y-scale y-scale)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (sin.f64 (*.f64 #s(literal 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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 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 8 binary64))))))))) (fma.f64 #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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.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)))))) (pow.f64 y-scale #s(literal 4 binary64))))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 6 binary64)))) (*.f64 #s(literal 1/8 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))))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))))) (fma.f64 #s(literal -1/16 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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 8 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (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) (fma.f64 #s(literal -8 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 y-scale y-scale)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (sin.f64 (*.f64 #s(literal 1/180 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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 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 8 binary64))))))))) (fma.f64 #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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))) (*.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)))))) (pow.f64 y-scale #s(literal 4 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (+.f64 (*.f64 #s(literal -1 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 -1 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 8 binary64)))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (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 4 binary64)) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))) (fma.f64 #s(literal -1 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 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 8 binary64)))))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -2 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.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))))) (*.f64 (*.f64 y-scale y-scale) (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 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 8 binary64)))))))))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 #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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 #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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 #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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* x-scale (* y-scale (pow 8 1/2))) (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) x-scale))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))) x-scale))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 #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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 #s(literal 1/4 binary64) (/.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))) x-scale))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale)))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.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 (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/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)))))) (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))))) (fma.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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 x-scale x-scale)))
#s(approx (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))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (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))) (/.f64 (fma.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (*.f64 #s(literal 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 (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))) (/.f64 (fma.f64 (*.f64 x-scale x-scale) (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 #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 (sin.f64 (*.f64 #s(literal 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 (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))) (/.f64 (fma.f64 (*.f64 x-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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/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 (sin.f64 (*.f64 #s(literal 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 (+ (* 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)) (/.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 (/ (* (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)) (/.f64 (fma.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale #s(literal 4 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) (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)) (/.f64 (fma.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 y-scale y-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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 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 (* (pow x-scale 2) (pow y-scale 2)) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))
#s(approx (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) (/.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 (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) (/.f64 (fma.f64 #s(literal -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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale #s(literal 4 binary64))))
#s(approx (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) (/.f64 (fma.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 y-scale y-scale)) (/.f64 (*.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 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 (- (/ (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))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.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)))))) (*.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 (+ (/ (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))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))) (/.f64 (+.f64 (/.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)))))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (pow.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)))))))) #s(literal 1/2 binary64)))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (pow.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)))))))) #s(literal 1/2 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 x-scale x-scale)) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 x-scale x-scale)) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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)))))))) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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))))))))) (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 x-scale #s(literal 4 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 x-scale x-scale)) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale)))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/2 binary64) (/.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.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 (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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)))))))) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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))))))))) (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (cos.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 x-scale #s(literal 6 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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)))))))) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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))))))))) (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 x-scale #s(literal 4 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.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)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.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)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) y-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) y-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.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)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) y-scale)))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (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 (*.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 2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (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 (*.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 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)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-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 x-scale x-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.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)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 (*.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 (*.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 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)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-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 x-scale x-scale)))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/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 y-scale y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (*.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 (*.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 (sin.f64 (*.f64 #s(literal 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (*.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 (*.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 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)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))) (sin.f64 (*.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 y-scale y-scale)))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.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)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 (*.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 (*.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 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)) (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))) (sin.f64 (*.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 y-scale y-scale))))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale 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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))) (/.f64 (fma.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 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 4 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (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))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))))) (pow.f64 (*.f64 x-scale 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 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (/.f64 (fma.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 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 4 binary64)))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 x-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 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 y-scale y-scale)))
#s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
#s(approx (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 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 y-scale y-scale)))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (*.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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 (fma.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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))))))) (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 a a) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 a a) (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 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 x-scale x-scale))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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 (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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/8 binary64) (/.f64 (*.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 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)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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)))))) (*.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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)))))))))) (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 a a) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (*.f64 (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 -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.f64 (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 -1 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 -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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))))))) (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 a a) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 a a) (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 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 x-scale (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.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 x-scale x-scale)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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))))))) (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 a a) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 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 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.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 x-scale x-scale)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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/8 binary64) (/.f64 (*.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 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)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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)))))) (*.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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)))))))))) (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 a a) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (*.f64 (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 -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.f64 (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 -1 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 -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))))) (*.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 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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))))))) (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 a a) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 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 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.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 x-scale x-scale)) (fma.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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 (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.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 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.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 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.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 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.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 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 x-scale (*.f64 (sin.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 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 (sin.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 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 (sin.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 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 (sin.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 (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) y-scale))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (fma.f64 #s(literal 1/2 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 (*.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) y-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (fma.f64 #s(literal 1/2 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 (*.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) y-scale))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (fma.f64 #s(literal 1/2 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 (*.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) y-scale)))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (*.f64 #s(literal 2 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))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (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 (*.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))))))) (fma.f64 #s(literal 2 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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (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 (*.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 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))))))) (fma.f64 #s(literal 2 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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (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 (*.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 (*.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 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))))))) (fma.f64 #s(literal 2 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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (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))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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(approx (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))) (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 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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(approx (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))) (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 (*.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 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))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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(approx (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))) (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (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 (*.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 (*.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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (pow.f64 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))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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(approx (+ (* 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)) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/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 (/ (* (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale 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 (/ (* (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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))) (/.f64 (fma.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)) (*.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 4 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64)))))))
#s(approx (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) (/.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/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 (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale 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 (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))) (/.f64 (fma.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)) (*.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 4 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))))
#s(approx (- (/ (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))) (*.f64 #s(literal -1 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))))
#s(approx (+ (/ (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))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (pow.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)))))))) #s(literal 1/2 binary64)))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 y-scale y-scale)) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (pow.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)))))))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 x-scale x-scale)) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 x-scale x-scale)) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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)))))))) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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))))))))) (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 x-scale #s(literal 4 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 x-scale x-scale)) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale)))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/2 binary64) (/.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.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 (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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)))))))) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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))))))))) (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 a a) (*.f64 (cos.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 x-scale #s(literal 6 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/8 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))))) (/.f64 (fma.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/4 binary64) (/.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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)))))))) (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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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 (*.f64 a a) (*.f64 (cos.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 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.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) (*.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))))))))) (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 x-scale #s(literal 4 binary64))) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (/.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 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.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)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.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)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 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)) (*.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 (*.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 y-scale y-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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 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 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.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 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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 (fma.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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))))))) (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 a a) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 a a) (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 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.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 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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 (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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/8 binary64) (/.f64 (*.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 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)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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)))))) (*.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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)))))))))) (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 a a) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (*.f64 (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 -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.f64 (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 -1 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 -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))))) (*.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 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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))))))) (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 a a) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 a a) (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 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.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 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 x-scale x-scale))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.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 x-scale x-scale)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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))))))) (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 a a) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 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 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.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 x-scale x-scale)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.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 b b) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.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)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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/8 binary64) (/.f64 (*.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 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)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 10 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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)))))) (*.f64 (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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)))))))))) (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 a a) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (*.f64 (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 -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.f64 (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 -1 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 -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))) (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (*.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/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))))) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale)))))))) (*.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 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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)))))))) (pow.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 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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)))))) (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 (pow.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(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.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 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 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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))))))) (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 a a) (*.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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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)))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 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 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 (*.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 (*.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 x-scale x-scale)))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.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/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.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/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 (sin.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/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 x-scale (fma.f64 #s(literal -1 binary64) (*.f64 (sin.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/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))))) (*.f64 (sin.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale)) (pow.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)))))))) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) y-scale) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (pow.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)))))))) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 y-scale y-scale)) (pow.f64 (pow.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)))))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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))))))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)))))) (pow.f64 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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))))))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (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 #s(literal 1/2 binary64) (/.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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))))))))))) (fma.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 -1 binary64)) #s(literal 1/2 binary64))))))))))
#s(approx (* y-scale (pow 8 1/2)) (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))
#s(approx y-scale y-scale)
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 #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 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 #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 x-scale x-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (*.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 (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 #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 x-scale 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 (*.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 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 #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 x-scale x-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (*.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 (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 #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 x-scale 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 (*.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 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 #s(literal 1/2 binary64) (/.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 (*.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 x-scale x-scale))) (-.f64 (*.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 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 (*.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 (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 #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 x-scale 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 (*.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 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 #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 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 #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 x-scale x-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (*.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 (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 #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 x-scale 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 (*.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 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (fma.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 #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 x-scale x-scale)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (*.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 (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 #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 x-scale 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 (*.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 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (fma.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 #s(literal 1/2 binary64) (/.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 (*.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 x-scale x-scale))) (-.f64 (*.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 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 (*.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 (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 #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 x-scale 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 (*.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 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* y-scale (pow 8 1/2)) (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale 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 (*.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 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.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 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 (*.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 (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 #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 x-scale 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 (*.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 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 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 (*.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 x-scale x-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))) y-scale))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 y-scale 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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.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 (fma.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 #s(literal 1/2 binary64) (/.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 (*.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 x-scale x-scale))) (-.f64 (*.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 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 (*.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 (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 #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 x-scale 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 (*.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 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 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 (*.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 (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 #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 x-scale 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 (*.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 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))) y-scale))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.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 (pow.f64 (sin.f64 (fma.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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/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 #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 x-scale x-scale)))))) (*.f64 y-scale y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 #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 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 (*.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 x-scale x-scale)))))) (*.f64 y-scale y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (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 (*.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 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 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 (*.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/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 #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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/.f64 (fma.f64 (*.f64 y-scale 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 (*.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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 #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 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 (*.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 (sin.f64 (*.f64 #s(literal 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) (/.f64 (fma.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 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) (/.f64 (fma.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 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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 x-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 y-scale #s(literal 4 binary64))))
#s(approx (* y-scale y-scale) (*.f64 y-scale y-scale))
#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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 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 (fma.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 x-scale x-scale)) (/.f64 (*.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 x-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 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 (-.f64 (/.f64 (*.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 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)))
#s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (+.f64 (/.f64 (*.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 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)))
#s(approx (+ (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow x-scale 2))) (/.f64 (+.f64 (/.f64 (*.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 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)))
#s(approx (* y-scale y-scale) (*.f64 y-scale y-scale))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (*.f64 x-scale (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 (sin.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 #s(literal 8 binary64) #s(literal 1/2 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 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 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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))))) (*.f64 (pow.f64 (sin.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 (sin.f64 (*.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) (pow.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 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 (*.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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 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 x-scale x-scale)))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (*.f64 x-scale (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (*.f64 x-scale (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.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 (*.f64 y-scale y-scale) (fma.f64 a (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (pow.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 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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))))) (*.f64 (pow.f64 (sin.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 (sin.f64 (*.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) (pow.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 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 (*.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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 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 x-scale 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 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 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 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 (sin.f64 (*.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) (pow.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 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 (*.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 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 1/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 (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (/.f64 (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 4 binary64)) (pow.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))))))))) (fma.f64 #s(literal -1/2 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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (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 x-scale #s(literal 4 binary64))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 (sin.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 #s(literal 8 binary64) #s(literal 1/2 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 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 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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))))) (*.f64 (pow.f64 (sin.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 (sin.f64 (*.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) (pow.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 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 (*.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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 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 x-scale x-scale)))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (*.f64 x-scale (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.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 (*.f64 y-scale y-scale) (fma.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 (sin.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 #s(literal 8 binary64) #s(literal 1/2 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 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 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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))))) (*.f64 (pow.f64 (sin.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 (sin.f64 (*.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) (pow.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 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 (*.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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 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 x-scale x-scale)))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 a (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)))) (*.f64 #s(literal 1/8 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))))) (pow.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (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 #s(literal 1/2 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/16 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (pow.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (pow.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) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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))))) (*.f64 (pow.f64 (sin.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 (sin.f64 (*.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) (pow.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 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 (*.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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 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 x-scale x-scale))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 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 (sin.f64 (*.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) (pow.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 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 (*.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 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 1/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 (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (/.f64 (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 4 binary64)) (pow.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))))))))) (fma.f64 #s(literal -1/2 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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (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 x-scale #s(literal 4 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 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 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.f64 (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 -1 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 -1 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 (sin.f64 (*.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) (pow.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 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 (*.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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.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) (pow.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 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 (*.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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))) (fma.f64 #s(literal -1 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 (sin.f64 (*.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) (pow.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 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 (*.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 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 1/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 (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (/.f64 (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 4 binary64)) (pow.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)))))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 (sin.f64 (*.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) (pow.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 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 (*.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 6 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal -1 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 (sin.f64 (*.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) (pow.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 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 (*.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 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 1/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 (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (/.f64 (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 4 binary64)) (pow.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 a a) (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 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (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)))) (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 (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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (pow.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 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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))))) (*.f64 (pow.f64 (sin.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 (sin.f64 (*.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) (pow.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 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 (*.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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 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 x-scale 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 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 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 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 (sin.f64 (*.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) (pow.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 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 (*.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 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 1/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 (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (/.f64 (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 4 binary64)) (pow.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))))))))) (fma.f64 #s(literal -1/2 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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (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 x-scale #s(literal 4 binary64))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 b b) (*.f64 x-scale (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.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 (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.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 b b) (*.f64 x-scale (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.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 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 (sin.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 #s(literal 8 binary64) #s(literal 1/2 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 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 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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))))) (*.f64 (pow.f64 (sin.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 (sin.f64 (*.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) (pow.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 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 (*.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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 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 x-scale x-scale)))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.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 b b) (*.f64 x-scale (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.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 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 (sin.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 #s(literal 8 binary64) #s(literal 1/2 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 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 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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))))) (*.f64 (pow.f64 (sin.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 (sin.f64 (*.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) (pow.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 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 (*.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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 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 x-scale x-scale)))))) (*.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))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (pow.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 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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))))) (*.f64 (pow.f64 (sin.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 (sin.f64 (*.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) (pow.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 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 (*.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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 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 x-scale 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 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 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 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 (sin.f64 (*.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) (pow.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 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 (*.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 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 1/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 (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (/.f64 (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 4 binary64)) (pow.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))))))))) (fma.f64 #s(literal -1/2 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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (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 x-scale #s(literal 4 binary64))))))))) (*.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 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.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 b b) (*.f64 x-scale (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (*.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 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 (sin.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 #s(literal 8 binary64) #s(literal 1/2 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 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 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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))))) (*.f64 (pow.f64 (sin.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 (sin.f64 (*.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) (pow.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 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 (*.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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 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 x-scale x-scale)))))) (*.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))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (pow.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 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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))))) (*.f64 (pow.f64 (sin.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 (sin.f64 (*.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) (pow.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 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 (*.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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 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 x-scale 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 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 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 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 (sin.f64 (*.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) (pow.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 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 (*.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 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 1/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 (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (/.f64 (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 4 binary64)) (pow.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))))))))) (fma.f64 #s(literal -1/2 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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (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 x-scale #s(literal 4 binary64))))))))) (*.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))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)))) (*.f64 #s(literal 1/8 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))))) (pow.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (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 #s(literal 1/2 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/16 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 10 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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/8 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (pow.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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.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 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 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))))) (pow.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) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 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))))) (*.f64 (pow.f64 (sin.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 (sin.f64 (*.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) (pow.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 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 (*.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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 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 x-scale x-scale))))))) (*.f64 (*.f64 a a) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 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 (sin.f64 (*.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) (pow.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 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 (*.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 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 1/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 (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (/.f64 (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 4 binary64)) (pow.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))))))))) (fma.f64 #s(literal -1/2 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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (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 x-scale #s(literal 4 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 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 #s(literal 1/2 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))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.f64 (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 -1 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 -1 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 (sin.f64 (*.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) (pow.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 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 (*.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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (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 (sin.f64 (*.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) (pow.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 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 (*.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 6 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 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))) (fma.f64 #s(literal -1 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 (sin.f64 (*.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) (pow.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 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 (*.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 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 1/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 (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (/.f64 (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 4 binary64)) (pow.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)))))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (pow.f64 (sin.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 (sin.f64 (*.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) (pow.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 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 (*.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 6 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/2 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 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal -1 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 (sin.f64 (*.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) (pow.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 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 (*.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 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 1/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 (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))) (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 (*.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 6 binary64)))) (*.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 (*.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 6 binary64)))))))) (/.f64 (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 4 binary64)) (pow.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 a a) (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 (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (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)))) (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 (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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.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 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (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 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (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 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (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)))) (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 (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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 (sin.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 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (fma.f64 x-scale (*.f64 (sin.f64 (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 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (fma.f64 x-scale (*.f64 (sin.f64 (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 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (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)))) (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 (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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) y-scale))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))) y-scale))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 y-scale 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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.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 (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)))) (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 (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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.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 (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)))) (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))) y-scale))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (/.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 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (/.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 (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 (*.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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 y-scale y-scale)))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (/.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 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))))) (fma.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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))) (*.f64 y-scale y-scale)))
#s(approx (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))) (/.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 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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(approx (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))) (/.f64 (fma.f64 (*.f64 y-scale y-scale) (fma.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)))))) (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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(approx (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))) (/.f64 (fma.f64 (*.f64 y-scale 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 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 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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)))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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(approx (+ (* 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)) (/.f64 (fma.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 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale #s(literal 4 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) (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)) (/.f64 (fma.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 x-scale x-scale)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 y-scale y-scale) (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 (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) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 y-scale #s(literal 4 binary64))))
#s(approx (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) (/.f64 (fma.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 x-scale x-scale)) (/.f64 (*.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 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 (- (/ (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))) (/.f64 (-.f64 (/.f64 (*.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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(approx (+ (/ (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))) (/.f64 (+.f64 (/.f64 (*.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)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.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 (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) y-scale) (pow.f64 (pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.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 (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 (pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 1/2 binary64))))) y-scale))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.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 (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)) (pow.f64 (pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 -1 binary64)) #s(literal 1/2 binary64)))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.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 (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 (pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 1/2 binary64))))) (*.f64 y-scale y-scale)))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.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)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 y-scale y-scale)) (pow.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)))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 y-scale y-scale)) (pow.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)))) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/4 binary64) (/.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))))))) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (pow.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)))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 y-scale y-scale)) (pow.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)))) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)))))))) (*.f64 (*.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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/2 binary64) (/.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 #s(literal 1/2 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/4 binary64) (/.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))))))) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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))))))))) (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)))))))) (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))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (pow.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)))) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/4 binary64) (/.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))))))) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (pow.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)))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.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 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.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 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (sin.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 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (sin.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 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (sin.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 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (sin.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 (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale)))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale))))
#s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (*.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale)))))
#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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (fma.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 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 2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) (fma.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 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 x-scale x-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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-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))))))) (fma.f64 #s(literal 2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 (*.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 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 x-scale x-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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-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))))))) (fma.f64 #s(literal 2 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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (*.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 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 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (*.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 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 x-scale x-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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-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))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 (*.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 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 x-scale x-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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 y-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))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale 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 x-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))) (- (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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)))))) (pow.f64 (*.f64 x-scale 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 x-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))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 a (*.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale)))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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 a a) (*.f64 (*.f64 x-scale x-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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)))))))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 x-scale #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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (+.f64 (*.f64 #s(literal -1 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 -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (*.f64 #s(literal 1/2 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 -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.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 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 a (fma.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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 a a) (*.f64 (*.f64 x-scale x-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 y-scale (fma.f64 #s(literal 1/4 binary64) (*.f64 (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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (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 (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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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 a a) (*.f64 (*.f64 x-scale x-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (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 (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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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)))))))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 x-scale #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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (+.f64 (*.f64 #s(literal -1 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 -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (*.f64 #s(literal 1/2 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 -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.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 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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 a a) (*.f64 (*.f64 x-scale x-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (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 (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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale)))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale))))
#s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (*.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale)))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (fma.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 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))))))) (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 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 y-scale)))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))) (fma.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 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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 y-scale #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 2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale))))))
#s(approx (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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 (*.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 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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 y-scale #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 2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 y-scale)))))))
#s(approx (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))) (fma.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 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 (sin.f64 (*.f64 #s(literal 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 (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))) (fma.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 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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 y-scale #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 (*.f64 #s(literal 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 (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))) (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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 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 (*.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 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))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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 y-scale #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 (*.f64 #s(literal 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 (+ (* 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)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale y-scale) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale 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 (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 x-scale 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 (- (/ (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))) (fma.f64 #s(literal -1 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 (*.f64 (sin.f64 (*.f64 #s(literal 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/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 1/2 binary64)))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.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)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 y-scale y-scale)) (pow.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)))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 y-scale y-scale)) (pow.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)))) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/4 binary64) (/.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))))))) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (pow.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)))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 y-scale y-scale)) (pow.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)))) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)))))))) (*.f64 (*.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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/2 binary64) (/.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 #s(literal 1/2 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/4 binary64) (/.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))))))) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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))))))))) (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)))))))) (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))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (pow.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)))) #s(literal -1/2 binary64))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 1/4 binary64) (/.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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)))))))) (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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.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))))))))) (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))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (pow.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)))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.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/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 (sin.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/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.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/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1 binary64) (*.f64 b (*.f64 (sin.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/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-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 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 (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 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y-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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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 a a) (*.f64 (*.f64 x-scale x-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))
#s(approx (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 a (fma.f64 #s(literal -1/4 binary64) (*.f64 (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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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)))))))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 x-scale #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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (+.f64 (*.f64 #s(literal -1 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 -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (*.f64 #s(literal 1/2 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 -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.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 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 a (fma.f64 #s(literal -1/8 binary64) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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 a a) (*.f64 (*.f64 x-scale x-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))) (*.f64 y-scale y-scale) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 a (fma.f64 #s(literal -1/8 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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 a a) (*.f64 (*.f64 x-scale x-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))))
#s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.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 b b) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 8 binary64))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 10 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 10 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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)))))))))) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 x-scale #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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (+.f64 (*.f64 #s(literal -1 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 -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (pow.f64 (sin.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (*.f64 #s(literal 1/2 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 -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 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 4 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.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 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64))))))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #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 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 a a) (*.f64 (*.f64 x-scale x-scale) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (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) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 12 binary64)) (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 12 binary64))) (/.f64 (*.f64 (pow.f64 x-scale #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 4 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 8 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 6 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.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 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (*.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))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 x-scale x-scale) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.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))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(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) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.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 b b) (*.f64 (sin.f64 (*.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) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.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)))) #s(literal 4 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.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)))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.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)))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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 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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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 (sin.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 (fma.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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (* y-scale (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2))))) (*.f64 #s(literal -1 binary64) (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 1/2 binary64))) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (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 #s(literal 1/2 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 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.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 (*.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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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)))))))) (fma.f64 (*.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 (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 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)) (pow.f64 (pow.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 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 -1 binary64)) #s(literal 1/2 binary64))))))))

eval838.0ms (0.9%)

Memory
5.8MiB live, 1 916.2MiB allocated; 319ms collecting garbage
Compiler

Compiled 1 401 306 to 13 577 computations (99% saved)

prune27.9s (31.1%)

Memory
6.8MiB live, 52 813.8MiB allocated; 6.3s collecting garbage
Pruning

42 alts after pruning (39 fresh and 3 done)

PrunedKeptTotal
New1 548251 573
Fresh191433
Picked415
Done224
Total1 573421 615
Accuracy
75.5%
Counts
1 615 → 42
Alt Table
Click to see full alt table
StatusAccuracyProgram
2.0%
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (/.f64 (fma.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)) (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 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
6.5%
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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(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))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
4.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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 (+ (* (* a a) (* (sin (+ (* 1/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))))))) (*.f64 y-scale y-scale)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
3.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) #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)))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 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(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
15.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(approx (sqrt (+ (* 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))))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))
37.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 b (*.f64 (sin.f64 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
17.3%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
17.3%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
✓35.3%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
9.8%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 (sin.f64 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))))
23.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 #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)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
32.2%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 #s(approx (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))) (/.f64 (*.f64 (sin.f64 (*.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 (sin.f64 (*.f64 #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)))))))))))
27.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 #s(approx (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))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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)))))))))))
30.5%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) y-scale)))))))
24.6%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 4 binary64)))))))))
28.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))
45.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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 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)))))
43.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))))
42.4%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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) #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(literal 1/2 binary64)))))
37.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.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)))))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
9.2%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
46.5%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a (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)))))))))
45.2%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)) (/.f64 (-.f64 (cos.f64 (-.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))))) (cos.f64 (+.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)))))) #s(literal 2 binary64)))))))))
44.5%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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 (exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))
45.2%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 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)))))))))
45.2%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 binary64)))) (sqrt.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)))))))))
41.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))))
21.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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))))) (exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64))))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
20.5%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
5.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (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)))))))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
20.0%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-scale #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
33.3%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/.f64 (*.f64 (sin.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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
28.6%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/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 y-scale y-scale))) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
9.2%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) #s(literal 1/2 binary64))))))
35.3%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale)))))
✓35.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
9.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
36.9%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
10.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
✓8.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
8.1%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
20.7%
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
Compiler

Compiled 68 563 to 6 291 computations (90.8% saved)

regimes212.0ms (0.2%)

Memory
33.8MiB live, 462.6MiB allocated; 24ms collecting garbage
Counts
83 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) #s(literal 1/2 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/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 y-scale y-scale))) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/.f64 (*.f64 (sin.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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-scale #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (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)))))))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.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 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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))))) (exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64))))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 binary64)))) (sqrt.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)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (exp.f64 (*.f64 (log.f64 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)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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 (exp.f64 (*.f64 (log.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)) (/.f64 (-.f64 (cos.f64 (-.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))))) (cos.f64 (+.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)))))) #s(literal 2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (*.f64 a (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)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) #s(approx (+ (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* b (* (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) (sqrt 2))))) (fma.f64 angle (fma.f64 #s(literal 1/180 binary64) (*.f64 b (*.f64 (PI.f64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 angle (fma.f64 #s(literal -1/64800 binary64) (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #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))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 angle (-.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/5832000 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.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)))))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) #s(approx (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2) (+.f64 (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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) #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(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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 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)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))))))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 4 binary64))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 (sin.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(approx (sqrt (+ (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)) (/ (pow (sin (+ (* 1/180 (* angle (PI))) (* 1/2 (PI)))) 2) (pow y-scale 2))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) y-scale)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 #s(approx (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))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 #s(approx (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))) (/.f64 (*.f64 (sin.f64 (*.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 (sin.f64 (*.f64 #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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 #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)) (pow.f64 y-scale #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (pow.f64 y-scale #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal -1 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 (*.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 (pow.f64 a #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a #s(approx (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (* y-scale (pow 8 1/2))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) y-scale)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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)))) (sqrt.f64 #s(literal 2 binary64)))) y-scale)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (fma.f64 #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/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 y-scale #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 #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)))) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) #s(approx (* (/ (* x-scale (* y-scale (* (pow 8 1/2) (+ (* 1/2 (* (+ (* -8 (* (/ (* b b) (* x-scale x-scale)) (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* y-scale y-scale)))) (* 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))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* 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 (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) -1) 1/2))) (/ (+ (* (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow (* x-scale y-scale) 2)))))) (* a a)) (pow (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale)))) (* (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))) (- (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale x-scale)) (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (* y-scale y-scale) (* x-scale x-scale)))) -1) 1/2)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))) (*.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 y-scale #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 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 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 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (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 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)) (*.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 6 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 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 6 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (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 4 binary64))) (pow.f64 x-scale #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (fma.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 2 binary64))))) (pow.f64 (sin.f64 (fma.f64 #s(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))))))) (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.f64 #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)))) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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(approx (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* x-scale x-scale)) (* (* y-scale y-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 a (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (*.f64 (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 x-scale y-scale) #s(literal 2 binary64))))))) (*.f64 a a)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 b (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (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 (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 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 (sin.f64 (*.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) (*.f64 x-scale x-scale))))))) (*.f64 b b)) (pow.f64 (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 (sin.f64 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (*.f64 b (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 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 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.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)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (sqrt 8) (sqrt (+ (* 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)))))) (fma.f64 b (*.f64 (sin.f64 (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 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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 b (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(approx (sqrt (+ (* 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))))) (*.f64 #s(literal -1 binary64) (*.f64 a (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(approx (sqrt (+ (* 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))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sqrt.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))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64))))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(approx (sqrt (+ (* 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))))) (fma.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.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))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale #s(approx (+ (* 1/8 (* (/ (* x-scale (* (pow 8 1/2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (* 4 (/ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* (- (* b b) (* a a)) (- (* b b) (* a a))))) (* x-scale x-scale)))) (/ (+ (* (* a a) (* (sin (* 1/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)))) (+ (* (* a a) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* (* b b) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* y-scale y-scale)) (pow (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) -1) 1/2))) (* 1/4 (* (* x-scale (pow 8 1/2)) (pow (+ (* 2 (/ (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale x-scale))) (* 2 (/ (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))) (* x-scale x-scale)))) 1/2)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.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)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) #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)))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (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))) (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (*.f64 #s(literal 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 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(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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 (+ (* (* a a) (* (sin (+ (* 1/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))))))) (*.f64 y-scale y-scale)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 y-scale (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.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)) (pow.f64 (pow.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)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.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)))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 #s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(/.f64 (neg.f64 #s(approx (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (*.f64 b b) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) y-scale)) (pow.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)))))))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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(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))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))) (sqrt.f64 (+.f64 (/.f64 (fma.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)) (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 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))))
Calls

8 calls:

29.0ms
(/.f64 angle #s(literal 180 binary64))
24.0ms
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
22.0ms
b
22.0ms
y-scale
22.0ms
x-scale
Results
AccuracySegmentsBranch
53.6%3(/.f64 angle #s(literal 180 binary64))
53.6%3(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
46.5%1(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
50.8%2a
52.1%2b
53.6%3angle
54.5%2x-scale
52.2%2y-scale
Compiler

Compiled 196 to 97 computations (50.5% saved)

regimes20.0ms (0%)

Memory
-3.6MiB live, 42.8MiB allocated; 5ms collecting garbage
Counts
29 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) #s(literal 1/2 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/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 y-scale y-scale))) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/.f64 (*.f64 (sin.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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-scale #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (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)))))))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.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 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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))))) (exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64))))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.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 (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.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 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64)))))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))
Calls

1 calls:

8.0ms
x-scale
Results
AccuracySegmentsBranch
54.5%2x-scale
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes115.0ms (0.1%)

Memory
16.2MiB live, 217.8MiB allocated; 70ms collecting garbage
Counts
27 → 3
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) #s(literal 1/2 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/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 y-scale y-scale))) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/.f64 (*.f64 (sin.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 (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* 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 x-scale #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (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 (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)))))))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 (pow.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 #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)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 #s(approx (+ (* 1/180 (* angle (PI))) (/ (PI) 2)) (*.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 y-scale y-scale))))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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))))) (exp.f64 (*.f64 (log.f64 y-scale) #s(literal 2 binary64))))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 y-scale y-scale) (*.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))))))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/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 y-scale y-scale))) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
Calls

8 calls:

24.0ms
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
19.0ms
(/.f64 angle #s(literal 180 binary64))
16.0ms
angle
12.0ms
y-scale
8.0ms
a
Results
AccuracySegmentsBranch
36.9%1(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
41.5%2a
41.9%2(/.f64 angle #s(literal 180 binary64))
41.9%2(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
41.9%2angle
44.5%3b
39.9%2y-scale
43.9%3x-scale
Compiler

Compiled 196 to 97 computations (50.5% saved)

regimes22.0ms (0%)

Memory
-4.8MiB live, 37.6MiB allocated; 14ms collecting garbage
Counts
17 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.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 (fma.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.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 (sin.f64 (*.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) (*.f64 x-scale x-scale)))) #s(literal 1/2 binary64)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sqrt.f64 #s(literal 2 binary64))) x-scale)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) #s(approx (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) x-scale)))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (fma.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 x-scale x-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.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)))) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 y-scale y-scale))))) #s(literal 1/2 binary64)) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale) (*.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 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))) #s(literal 1/2 binary64))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 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 (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 (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 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 1/2 binary64)))))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))
Calls

1 calls:

5.0ms
b
Results
AccuracySegmentsBranch
42.7%2b
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes63.0ms (0.1%)

Memory
-6.8MiB live, 103.4MiB allocated; 39ms collecting garbage
Counts
10 → 4
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
Calls

7 calls:

14.0ms
y-scale
4.0ms
b
4.0ms
(/.f64 angle #s(literal 180 binary64))
4.0ms
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
3.0ms
a
Results
AccuracySegmentsBranch
36.9%1y-scale
36.9%1a
42.6%4(/.f64 angle #s(literal 180 binary64))
42.6%4(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
42.6%4angle
36.9%1x-scale
36.9%1b
Compiler

Compiled 13 to 41 computations (-215.4% saved)

regimes43.0ms (0%)

Memory
29.2MiB live, 73.8MiB allocated; 9ms collecting garbage
Counts
9 → 1
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 b #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)))) (sqrt.f64 #s(literal 2 binary64)))))))))))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
Calls

5 calls:

14.0ms
(/.f64 angle #s(literal 180 binary64))
6.0ms
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
5.0ms
angle
5.0ms
b
5.0ms
x-scale
Results
AccuracySegmentsBranch
36.9%1b
36.9%1x-scale
36.9%1(/.f64 angle #s(literal 180 binary64))
36.9%1(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
36.9%1angle
Compiler

Compiled 11 to 31 computations (-181.8% saved)

regimes62.0ms (0.1%)

Memory
-11.5MiB live, 86.2MiB allocated; 23ms collecting garbage
Counts
6 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))
Calls

8 calls:

21.0ms
a
8.0ms
x-scale
4.0ms
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
4.0ms
(/.f64 angle #s(literal 180 binary64))
4.0ms
b
Results
AccuracySegmentsBranch
25.4%2y-scale
20.7%1a
20.7%1(/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (+.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)) (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(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
26.4%3(/.f64 angle #s(literal 180 binary64))
26.4%3(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
26.4%3angle
22.8%2b
26.2%2x-scale
Compiler

Compiled 196 to 97 computations (50.5% saved)

regimes7.0ms (0%)

Memory
14.8MiB live, 14.8MiB allocated; 0ms collecting garbage
Counts
2 → 2
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))))
Calls

1 calls:

2.0ms
x-scale
Results
AccuracySegmentsBranch
25.9%2x-scale
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes14.0ms (0%)

Memory
-17.4MiB live, 30.8MiB allocated; 4ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
Outputs
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
Calls

7 calls:

1.0ms
(/.f64 angle #s(literal 180 binary64))
1.0ms
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
1.0ms
angle
1.0ms
x-scale
1.0ms
y-scale
Results
AccuracySegmentsBranch
20.7%1a
20.7%1b
20.7%1(/.f64 angle #s(literal 180 binary64))
20.7%1(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
20.7%1angle
20.7%1y-scale
20.7%1x-scale
Compiler

Compiled 13 to 41 computations (-215.4% saved)

bsearch77.0ms (0.1%)

Memory
-6.8MiB live, 137.5MiB allocated; 11ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
64.0ms
5040100939097235.0
2.2415558331781542e+22
Samples
54.0ms144×0valid
Compiler

Compiled 4 047 to 1 374 computations (66% saved)

Precisions
Click to see histograms. Total time spent on operations: 44.0ms
ival-mult: 13.0ms (29.4% of total)
ival-pow2: 11.0ms (24.9% of total)
ival-div: 7.0ms (15.8% of total)
ival-sinu: 4.0ms (9.1% of total)
ival-add: 3.0ms (6.8% of total)
ival-cosu: 3.0ms (6.8% of total)
ival-sqrt: 2.0ms (4.5% of total)
ival-sub: 1.0ms (2.3% of total)
ival-neg: 1.0ms (2.3% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch5.0ms (0%)

Memory
9.9MiB live, 9.9MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
3.0ms
5040100939097235.0
2.2415558331781542e+22
Compiler

Compiled 3 885 to 1 347 computations (65.3% saved)

bsearch135.0ms (0.2%)

Memory
-31.0MiB live, 169.5MiB allocated; 55ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
41.0ms
2.4978897694930285e+29
1.292140791858951e+30
44.0ms
5.4279312213158025e+23
4.6136725610658076e+24
Samples
72.0ms192×0valid
Compiler

Compiled 8 112 to 2 412 computations (70.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 63.0ms
ival-mult: 17.0ms (26.9% of total)
ival-pow2: 15.0ms (23.8% of total)
ival-div: 12.0ms (19% of total)
ival-sinu: 6.0ms (9.5% of total)
ival-cosu: 5.0ms (7.9% of total)
ival-add: 4.0ms (6.3% of total)
ival-sqrt: 2.0ms (3.2% of total)
ival-neg: 2.0ms (3.2% of total)
ival-sub: 1.0ms (1.6% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch105.0ms (0.1%)

Memory
18.6MiB live, 114.9MiB allocated; 8ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
96.0ms
391454143359461000.0
5.4279312213158025e+23
Samples
87.0ms144×0valid
Compiler

Compiled 4 335 to 1 536 computations (64.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 81.0ms
ival-cosu: 36.0ms (44.4% of total)
ival-mult: 12.0ms (14.8% of total)
ival-pow2: 11.0ms (13.6% of total)
ival-div: 7.0ms (8.6% of total)
ival-sqrt: 6.0ms (7.4% of total)
ival-sinu: 4.0ms (4.9% of total)
ival-add: 3.0ms (3.7% of total)
ival-sub: 1.0ms (1.2% of total)
ival-neg: 1.0ms (1.2% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch175.0ms (0.2%)

Memory
16.6MiB live, 298.3MiB allocated; 31ms collecting garbage
Algorithm
3×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
69.0ms
1.4848872589100108e+155
8.097765272865727e+163
16.0ms
7.4045635877144e+75
8.654564258349964e+75
64.0ms
3.209539376434337e+28
1.8975428369390353e+31
Samples
127.0ms304×0valid
Compiler

Compiled 10 930 to 4 101 computations (62.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 114.0ms
ival-mult: 31.0ms (27.1% of total)
ival-pow2: 29.0ms (25.4% of total)
ival-div: 17.0ms (14.9% of total)
ival-sinu: 12.0ms (10.5% of total)
ival-cosu: 10.0ms (8.8% of total)
ival-add: 6.0ms (5.3% of total)
ival-sqrt: 4.0ms (3.5% of total)
ival-neg: 3.0ms (2.6% of total)
ival-sub: 2.0ms (1.8% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch78.0ms (0.1%)

Memory
9.1MiB live, 102.4MiB allocated; 6ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
71.0ms
9.38004303054766e+141
5.8389857228549615e+143
Samples
57.0ms112×0valid
Compiler

Compiled 16 580 to 1 985 computations (88% saved)

Precisions
Click to see histograms. Total time spent on operations: 52.0ms
ival-pow2: 26.0ms (50% of total)
ival-mult: 10.0ms (19.2% of total)
ival-div: 5.0ms (9.6% of total)
ival-sinu: 3.0ms (5.8% of total)
ival-add: 2.0ms (3.8% of total)
ival-cosu: 2.0ms (3.8% of total)
ival-sub: 1.0ms (1.9% of total)
ival-sqrt: 1.0ms (1.9% of total)
ival-neg: 1.0ms (1.9% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch25.0ms (0%)

Memory
2.7MiB live, 47.5MiB allocated; 4ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
22.0ms
9.38004303054766e+141
5.8389857228549615e+143
Samples
11.0ms32×0valid
Compiler

Compiled 16 650 to 2 027 computations (87.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 10.0ms
ival-mult: 3.0ms (30.2% of total)
ival-pow2: 2.0ms (20.1% of total)
ival-div: 1.0ms (10.1% of total)
ival-add: 1.0ms (10.1% of total)
ival-cosu: 1.0ms (10.1% of total)
ival-sinu: 1.0ms (10.1% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-sub: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
ival-sqrt: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-neg: 0.0ms (0% of total)

simplify85.0ms (0.1%)

Memory
10.8MiB live, 151.0MiB allocated; 15ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03259756
15849756
221609756
Stop Event
1×node limit
Calls
Call 1
Inputs
(if (<=.f64 x-scale #s(literal 6600000000000000 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64))))))
(if (<=.f64 x-scale #s(literal 6600000000000000 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))
(if (<=.f64 b #s(literal 4400000000000000033554432 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (if (<=.f64 b #s(literal 1099999999999999993725589651456 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/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 y-scale y-scale))) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))))
(if (<=.f64 b #s(literal 269999999999999987417088 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))))))
(if (<=.f64 angle #s(literal 1399999999999999915248484089856 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (if (<=.f64 angle #s(literal 7999999999999999412318249411849591388070425721595743098101171358242898444288 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))) (if (<=.f64 angle #s(literal 84999999999999998213603245593805083795683535920658541195366571638195986967256819992309064720081154714209333698972015804276677658957652836441586904062511412150272 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
(if (<=.f64 x-scale #s(literal 18999999999999999476396525475022027720228264015942097072623425472923996452926663318967571410690324488466571267556391780575977246609468328771584 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
(if (<=.f64 x-scale #s(literal 17499999999999999874008016643422691493242493396555902453356521017389980179001066931149884312995203147268553267627440684179663839573941304688640 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))
Outputs
(if (<=.f64 x-scale #s(literal 6600000000000000 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))) (pow.f64 (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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (*.f64 (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 1/2 binary64))))))
(if (<=.f64 x-scale #s(literal 6600000000000000 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (pow.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 #s(literal 2 binary64) (*.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))
(if (<=.f64 b #s(literal 4400000000000000033554432 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (if (<=.f64 b #s(literal 1099999999999999993725589651456 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/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 y-scale y-scale))) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))))
(if (<=.f64 b #s(literal 4400000000000000033554432 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (if (<=.f64 b #s(literal 1099999999999999993725589651456 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (pow.f64 (+.f64 #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))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/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 y-scale y-scale))) #s(approx (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2)) (+.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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.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 1/2 binary64))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64)))))))
(if (<=.f64 b #s(literal 269999999999999987417088 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))))))
(if (<=.f64 b #s(literal 269999999999999987417088 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale #s(literal 4 binary64))))))
(if (<=.f64 angle #s(literal 1399999999999999915248484089856 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (if (<=.f64 angle #s(literal 7999999999999999412318249411849591388070425721595743098101171358242898444288 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 b (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))) (if (<=.f64 angle #s(literal 84999999999999998213603245593805083795683535920658541195366571638195986967256819992309064720081154714209333698972015804276677658957652836441586904062511412150272 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 a (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
(if (<=.f64 angle #s(literal 1399999999999999915248484089856 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))) (if (<=.f64 angle #s(literal 7999999999999999412318249411849591388070425721595743098101171358242898444288 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 (*.f64 #s(literal -1 binary64) b) (fma.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))) (if (<=.f64 angle #s(literal 84999999999999998213603245593805083795683535920658541195366571638195986967256819992309064720081154714209333698972015804276677658957652836441586904062511412150272 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (*.f64 (*.f64 #s(literal -1 binary64) a) (fma.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (pow.f64 a #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64)))))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 a (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 2 binary64)) (*.f64 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)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 a (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (sqrt 8)) (sqrt (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* y-scale (pow 8 1/2)) (pow (+ (* 2 (* (* a a) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (* b b) (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))))))) 1/2)) (fma.f64 b (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.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))))) (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))))) (*.f64 b (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))
(if (<=.f64 x-scale #s(literal 18999999999999999476396525475022027720228264015942097072623425472923996452926663318967571410690324488466571267556391780575977246609468328771584 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) (*.f64 b (*.f64 x-scale (*.f64 #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))))))
(if (<=.f64 x-scale #s(literal 17499999999999999874008016643422691493242493396555902453356521017389980179001066931149884312995203147268553267627440684179663839573941304688640 binary64)) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))))))))))) #s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (*.f64 #s(literal 1/4 binary64) #s(approx (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2)) #s(approx (* b (* x-scale (* (sin (* 1/180 (* angle (PI)))) (* (sqrt 2) (sqrt 8))))) (*.f64 #s(literal 1/180 binary64) (*.f64 angle (*.f64 b (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))))))))))
#s(approx (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (+ (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) #s(approx (* 1/4 (* (* b (* x-scale (* y-scale (pow 8 1/2)))) (pow (+ (pow (+ (* 4 (* (/ (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 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)) (/ (* (sin (* 1/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)) (/ (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* y-scale y-scale))))) 1/2) (/ (+ (* (* (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2))) (sin (+ (* 1/180 (* angle (PI))) (/ (PI) 2)))) (* y-scale y-scale)) (* (* x-scale x-scale) (* (sin (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow (* x-scale y-scale) 2))) 1/2))) (fma.f64 #s(literal 1/4 binary64) (*.f64 b (*.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)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/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 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.f64 (*.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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64)) (-.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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.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 (*.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (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 (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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 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 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 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 (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 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 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (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))))) (*.f64 y-scale 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 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (fma.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 (*.f64 (sin.f64 (*.f64 #s(literal 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 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))) #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)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))))))))))))

derivations420.0ms (0.5%)

Memory
-23.6MiB live, 450.3MiB allocated; 60ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 10 360 to 320 computations (96.9% saved)

preprocess269.0ms (0.3%)

Memory
8.9MiB live, 440.1MiB allocated; 68ms collecting garbage
Remove

(abs a)

Compiler

Compiled 33 210 to 3 272 computations (90.1% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...